* Fir for storing the idl-to pascal-type mapping to disk

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2340 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
loesje_
2012-03-15 10:22:10 +00:00
parent c59ab57339
commit 07bc0b98a9

View File

@ -80,7 +80,7 @@ implementation
procedure TTypeSettings.bLoadMapClick(Sender: TObject); procedure TTypeSettings.bLoadMapClick(Sender: TObject);
begin begin
if OpenDialog.Execute then if OpenDialog.Execute then
ValueListEditor1.LoadFromFile(OpenDialog.FileName); ValueListEditor1.Strings.LoadFromFile(OpenDialog.FileName);
end; end;
procedure TTypeSettings.bSaveClistClick(Sender: TObject); procedure TTypeSettings.bSaveClistClick(Sender: TObject);
@ -98,7 +98,7 @@ end;
procedure TTypeSettings.bSaveMapClick(Sender: TObject); procedure TTypeSettings.bSaveMapClick(Sender: TObject);
begin begin
if SaveDialog.Execute then if SaveDialog.Execute then
ValueListEditor1.SaveToFile(SaveDialog.FileName); ValueListEditor1.Strings.SaveToFile(SaveDialog.FileName);
end; end;