You've already forked lazarus-ccr
* 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:
@ -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;
|
||||||
|
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user