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

MG: fixed client events

Browse Source 
git-svn-id: trunk@729 -
This commit is contained in:
lazarus 2002-02-09 01:45:56 +00:00
parent d986734622
commit 2074dee40b
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -2472,7 +2472,7 @@ begin
end;
{-------------------------------------------------------------------------------
TgtkObject.HookSignals
TgtkObject.DestroyLCLControl
Params: Sender: TObject
Destroy the widget and all associated data
@ -3656,7 +3656,7 @@ begin
csProgressBar:
with (TProgressBar (Sender)) do
begin
{ Create a GtkAdjusment object to hold the range of the progress bar }
{ Create a GtkAdjustment object to hold the range of the progress bar }
TempWidget := PGtkWidget( gtk_adjustment_new (Position, Min, Max, 0, 0, 0));
{ Create the GtkProgressBar using the adjustment }
P := gtk_progress_bar_new_with_adjustment (PGtkAdjustment (TempWidget));
@ -5266,6 +5266,9 @@ end;
{ =============================================================================
$Log$
Revision 1.151 2002/08/04 07:09:28 lazarus
MG: fixed client events
Revision 1.150 2002/07/29 13:26:57 lazarus
MG: source notebook pagenames are now updated more often