|
Registriert seit: 29. Jul 2003
Ort: Essen
454 Beiträge
Delphi 2010 Professional
|
Re: Exception bei Locate
28. Jan 2009, 08:21
Delphi-Quellcode:
if TB1.Active then
begin
if (Key in ['a'..'z', 'A'..'Z']) then
if TB1.FieldList.IndexOf(SelectedCol) <> -1 then // SelectCol wird gesetzt beim TitleClick
TB1.Locate(SelectedCol, Key, [loCaseInsensitive, loPartialKey]);
end;
Ich weiß, daß ich nichts weiß! Sokrates 
|