paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-14 09:19:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

MG: fixed memcheck output

Browse Source 
git-svn-id: trunk@2967 -
This commit is contained in:
lazarus 2002-08-18 08:56:38 +00:00
parent 0498f6377e
commit 9541ea6418
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ide/lazarus.pp
View File

@ -67,7 +67,7 @@ begin
Application.CreateForm(TMainIDE, MainIDE); Application.CreateForm(TMainIDE, MainIDE);
{$IFDEF IDE_MEM_CHECK} {$IFDEF IDE_MEM_CHECK}
CheckHeap('TMainIDE created'); CheckHeapWrtMemCnt('lazarus.pp: TMainIDE created');
{$ENDIF} {$ENDIF}
Application.CreateForm(TMessagesView, MessagesView); Application.CreateForm(TMessagesView, MessagesView);
@ -86,6 +86,9 @@ end.
{ {
$Log$ $Log$
Revision 1.37 2002/09/13 08:11:45 lazarus
MG: fixed memcheck output
Revision 1.36 2002/07/30 06:24:04 lazarus Revision 1.36 2002/07/30 06:24:04 lazarus
MG: added a faster version of TXMLConfig MG: added a faster version of TXMLConfig

2
ide/uniteditor.pp
View File

@ -1182,7 +1182,7 @@ procedure TSourceEditor.InsertGPLNotice(CommentType: TCommentType);
var var
Txt: string; Txt: string;
begin begin
Txt:=CommentText(lisGPLNotice,CommentType); Txt:=CommentText(Format(lisGPLNotice,[#13#13,#13#13]),CommentType);
FEditor.SelText:=Txt; FEditor.SelText:=Txt;
end; end;