automat. Dateinamenergänzung für Editfeld

[Tim Henford]

Hallo,

ich wollte mal fragen wie kompliziert eine automat. Dateinamenergänzung wäre für ein Editfeld.
Also es soll im Prinzip ein A eingegeben werden und dann soll automat. nach den Dateien in einen Ordner geguckt werden und die erste soll dann automat. in das Textfeld kommen.
Also in etwa so wie in einem Browser die URL Eingabe...

Danke Tim

[mkinzler]

Schau dir malTJvValidateEdit aus der JVCL an.

[fLaSh11]

Zitat von Tim Henford:

Also in etwa so wie in einem Browser die URL Eingabe...

Das ist ne Combobox und dann werden alle eingegebenen Elemente gespeichert und bei Bedarf abgefragt.

[_frank_]

hier mal die Autovervollständigen-Prozedur, die ich verwende:

Delphi-Quellcode:

procedure Autocomplete(Combobox:TCombobox);
var
  oldpos: Integer;
  item: Integer;
  changeproc:TNotifyEvent;
begin
  with combobox do
  begin
    oldpos := selstart;
    item := Perform( CB_FINDSTRING, -1,
                     lparam( Pchar( text )));
    if item >= 0 then
    begin
      changeproc:=onchange;
      onchange := nil;
      text := items[item];
      selstart := oldpos;
      sellength := gettextlen - selstart;
      onchange := changeproc;
    end;
  end;
end;

HTH Frank