Einzelnen Beitrag anzeigen

Benutzerbild von rainman51
rainman51

Registriert seit: 31. Jan 2007
Ort: Lichtenstein
51 Beiträge
 
#19

Re: Einen bestimmten Datenfeld in einer Datenbank auswählen?

  Alt 4. Feb 2007, 13:26
Delphi-Quellcode:
procedure TFormloch.ButtondeletClick(Sender: TObject);
begin
 if (editeingabe.Text <> '') then begin
if MessageBox(0, 'Soll der Datensatz gelöscht werden?', 'Datensatzlöschen',MB_YESNO) = 6 then begin

Adoqueryauswahl.SQL.Clear;
Adoqueryauswahl.SQL.Add('Delete FROM "Inventarverwaltung" WHERE Anlagegut.Inventarnummer = '+
QuotedStr(Editeingabe.text));
Adoqueryauswahl.ExecSQL;

showmessage('Ok');
               end
               else MessageBox(0, 'Datensatz ist noch vorhanden', 'Vorgang abgebrochen',MB_Ok)
   end
   else showmessage ('Bitte Inventarnummer eingeben!');

end;

end.
Unten ein Bild von dem Programm

[edit=Jelly]Delphi Tags bitt einpflegen. Mfg, Jelly[/edit]
Angehängte Dateien
Dateityp: doc dok2_162.doc (164,5 KB, 5x aufgerufen)
Die Wahrheit ist unsterblich
  Mit Zitat antworten Zitat