Why not to implement a Find method for TListBox which allows partial
search? Delphi missed it, but why Lazarus does the same?

function TCustomListBox.Find(S : string) : integer;
begin
  {$IFDEF WINDOWS}
  Result := SendMessage(Handle, LB_FINDSTRING, -1, LParam(PChar(S)));
  {$ELSE}
  Result := Items.IndexOf(S);
  {$ENDIF}
end;

Antônio
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to