Flummi/amxmodx
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fixed memory leak

Browse Source 
Updated Modified-Event (now only one parameter [the modified text])
This commit is contained in:
Christian Hammacher
2005-09-07 22:20:28 +00:00
parent 80048eba61
commit 7c21deb0f2
10 changed files with 155 additions and 85 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
editor/studio/UnitCodeSnippets.pas
View File

@ -25,7 +25,7 @@ begin
Result := StringReplace(Result, #2, #13#10, [rfReplaceAll]);
end;
end;
eFile.Free;
eFile.Destroy;
end;
function GetSnippetList(Lang: String): TStringList;
@ -48,7 +48,7 @@ begin
eFile.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'config\' + Lang + '.csl'); // ... .csl = CodeSnippetList
eFile.Add(Ident + #1 + Code);
eFile.SaveToFile(ExtractFilePath(ParamStr(0)) + 'config\' + Lang + '.csl'); // ... .csl = CodeSnippetList
eFile.Free;
eFile.Destroy;
end;
procedure DelSnippet(Lang, Ident: String);
@ -62,7 +62,7 @@ begin
eFile.Delete(i);
end;
eFile.SaveToFile(ExtractFilePath(ParamStr(0)) + 'config\' + Lang + '.csl'); // ... .csl = CodeSnippetList
eFile.Free;
eFile.Destroy;
end;
procedure SetSnippet(Lang, Ident, Code: String);
@ -78,7 +78,7 @@ begin
if Pos(Ident + #1, eFile[i]) = 1 then begin
eFile[i] := Ident + #1 + Code;
eFile.SaveToFile(ExtractFilePath(ParamStr(0)) + 'config\' + Lang + '.csl'); // ... .csl = CodeSnippetList
eFile.Free;
eFile.Destroy;
exit;
end;
@ -86,7 +86,7 @@ begin
{ else... }
eFile.Add(Ident + #1 + Code);
eFile.SaveToFile(ExtractFilePath(ParamStr(0)) + 'config\' + Lang + '.csl'); // ... .csl = CodeSnippetList
eFile.Free;
eFile.Destroy;
end;
end.