Thema: Delphi Autovervollständigung.

Einzelnen Beitrag anzeigen

Akut-Programming

Registriert seit: 18. Aug 2003
648 Beiträge
 
#3

Re: Autovervollständigung.

  Alt 21. Apr 2004, 11:55
Also, ich weiß jetzt nicht genau, ob ich dich richtig verstanden hab. Aber wenn du wissen willst, ob der String im "memofeld" ist, könntest du es doch z.B. so machen
Delphi-Quellcode:
Query1.active:=false;
Query1.SQL.Clear;
Query1.SQL.Add('select titel,datei from tabelle1 where memofeld like %'+edit1.Text+'%');
Query1.ExecSQL;
Query1.active:=true;

if Query1.RecordCount<>1
then begin
Query2.SQL.Clear;
Query2.SQL.Add(insert into tabelle1 values (titel, datei, memofeld) ('Beispiel','datei1.txt',+edit1.text));
Query2.ExecSQL;
end else if Query1.RecordCount=1
then begin
Application.MessageBox('Der String existiert bereits in der Datei!','Datensatz vorhanden', MB_OK + MB_ICONINFORMATION);
end;
Funktionalität hab ich jetzt nicht getestet. Aber so könntest du z.B. abfragen ob der String aus deinem Edit in dem Text in deiner Tabelle ist. Über die abfrage des Recordcounts kannst du dann je nach belieben weitere Aufgaben ausführen. - So wie im oberen Code: wenn das Recordcount 1 ergibt, ist der String enthalten, andernfalls soll er es einfügen. Ist vielleicht nicht die beste Lösung, aber ich hoffe es reicht erstmal.

Gruß,
Akut-Programming
be cool, be hot ... just be
  Mit Zitat antworten Zitat