paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-20 08:29:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

TaskDialog: LCLTaskDialog: remove debug statement.

Browse Source
This commit is contained in:
Bart 2023-08-07 18:39:12 +02:00
parent 11130cc6b0
commit 8e0fb1875f
1 changed files with 1 additions and 1 deletions

2
lcl/taskdlgemulation.pp
View File

@ -824,7 +824,7 @@ begin
// handle main dialog icon
AddIcon(IconBorder, X, Y, CurrParent);
if (X < IconBorder) or (X < 5) then Caption := format('X: %d, IconBorder: %d',[X,IconBorder]);
// add main texts (DlgTitle, DlgText, Information)
Element[tdeMainInstruction] := AddLabel(DlgTitle, True, X, Y, FontHeight, aWidth, CurrParent);
Element[tdeContent] := AddLabel(DlgText, False, X, Y, FontHeight, aWidth, CurrParent);