paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-10 12:39:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

MG: fixed message without handle

Browse Source 
git-svn-id: trunk@1149 -
This commit is contained in:
lazarus 2002-02-09 01:47:58 +00:00
parent 5f83cbb225
commit 39e0610e6f
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/gtk/gtkobject.inc
View File

@ -2064,8 +2064,6 @@ begin
min_aspect:= 0;
max_aspect:= 1;
end;
if Sender is TCustomForm then
writeln('LM_SETGEOMETRY ',Sender.ClassName);
gtk_window_set_geometry_hints(PGtkWindow(Widget), nil, @Geometry,
GDK_HINT_MIN_SIZE or GDK_HINT_MAX_SIZE);
end;
@ -6526,6 +6524,9 @@ end;
{ =============================================================================
$Log$
Revision 1.273 2002/10/30 13:50:26 lazarus
MG: fixed message without handle
Revision 1.272 2002/10/30 13:20:11 lazarus
MG: fixed example