Einzelnen Beitrag anzeigen

Albi

Registriert seit: 4. Mai 2003
Ort: Berlin
458 Beiträge
 
Delphi 7 Professional
 
#8

Re: Tabellen springen zum letzten Datensatz, warum?

  Alt 23. Jun 2004, 21:26
Ich kenne mich mit Table nicht so gut aus, daher hier mal ein Beispiel mit Query.

SQL-Code:
Query1.close;
Query1.SQL.clear;
Query1.SQL.Text:= 'Select * From DB WHERE ID Like '+Edit.WhgNr';
Query1.open;

If Query1.RecordCount > 0 Then
Begin
ShowMessage(
'Die Whg-Nr ist bereist vergeben')
else
//dein restlicher Code zum Beispiel speichern
end;
Dieses Code könnstest Du in das OnExit Ereignis deines Edit eintragen und jedesmal, wenn du das Edit verläßt, wird überprüft, ob die Whg-Nr bereits vergeben ist oder nicht.
  Mit Zitat antworten Zitat