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

MG: fixed resetting comobobox text

Browse Source 
git-svn-id: trunk@874 -
This commit is contained in:
lazarus 2002-02-09 01:47:12 +00:00
parent c3a37da303
commit 5f5ad40a22
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lcl/interfaces/gtk/gtkproc.inc
View File

@ -88,8 +88,11 @@ begin
SavedText:=nil;
gtk_object_set_data(PgtkObject(ComboWidget),'LCLOldText',SavedText);
// set new text
//writeln('SetComboBoxText: "',NewText,'"');
if NewText<>nil then
gtk_entry_set_text(PGtkEntry(ComboWidget^.entry), NewText);
gtk_entry_set_text(PGtkEntry(ComboWidget^.entry), NewText)
else
gtk_entry_set_text(PGtkEntry(ComboWidget^.entry), #0);
end;
{------------------------------------------------------------------------------
@ -2633,6 +2636,9 @@ end;
{ =============================================================================
$Log$
Revision 1.81 2002/08/31 07:58:22 lazarus
MG: fixed resetting comobobox text
Revision 1.80 2002/08/30 12:32:23 lazarus
MG: MoveWindowOrgEx, Splitted FWinControls/FControls, TControl drawing, Better DesignerDrawing, ...