Thema: Delphi Wiedervorlageliste

Einzelnen Beitrag anzeigen

Benutzerbild von CenBells
CenBells

Registriert seit: 30. Mär 2003
Ort: Kiel urspr. Lübeck
176 Beiträge
 
Delphi 7 Professional
 
#6

Re: Wiedervorlageliste

  Alt 15. Mär 2004, 09:46
hallo,

für dein Vorhaben benötigst du nicht viel

Schreibe eine Methode, die folgendermaßen arbeitet (beachte, du benötigst ein Query)

Delphi-Quellcode:
procedure testUndAnzeige;
begin
  deinQuery.Sql.text :=
    'SELECT Count(*)'#13#10 +
    ' FROM Tabelle'#13#10 +
    ' WHERE DeineSpalte = ' + QuotedStr(DateToStr(Now));
  deinQuery.Open;
  if (deinQuery.Fields[0].AsInteger > 0) then
    zeigeFormAn;
end;
//edit: mist zu langsam

Gruß
Ken
  Mit Zitat antworten Zitat