ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/journaling/ibcontrols/IBLookupComboEditBox.pas
(Generate patch)

Comparing ibx/trunk/ibcontrols/IBLookupComboEditBox.pas (file contents):
Revision 28 by tony, Tue Apr 14 13:10:23 2015 UTC vs.
Revision 29 by tony, Sat May 9 11:37:49 2015 UTC

# Line 114 | Line 114 | type
114      procedure DoEnter; override;
115      procedure DoExit; override;
116      procedure KeyUp(var Key: Word; Shift: TShiftState); override;
117 +    procedure Loaded; override;
118      procedure Notification(AComponent: TComponent; Operation: TOperation); override;
119      procedure SetItemIndex(const Val: integer); override;
120      function SQLSafe(aText: string): string;
# Line 486 | Line 487 | begin
487       (not (cbactEndOfLineComplete in AutoCompleteText) or (SelStart = UTF8Length(Text))) then
488      FTimer.Interval := FKeyPressInterval
489    else
490 <    FTimer.Interval := 0
490 >    FTimer.Interval := 0;
491 > end;
492 >
493 > procedure TIBLookupComboEditBox.Loaded;
494 > begin
495 >  inherited Loaded;
496 >  IBControlLinkChanged;
497   end;
498  
499   procedure TIBLookupComboEditBox.Notification(AComponent: TComponent;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines