[delphi]habe diesen quelltext:
Delphi-Quelltext
ausgeblendet markieren
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
procedure TForm2.BitBtn2Click(Sender: TObject);
begin
form3.Table1.Insert;
form3.Table1.FieldValues['Datum'] := dbedit2.text;
form3.Table1.FieldValues['Stunde'] := DBLookupComboBox3.text;
form3.Table1.FieldValues['Haus'] := DBLookupComboBox1.text;
form3.Table1.FieldValues['Raum'] := DBLookupComboBox2.text;
form3.Table1.FieldValues['Klassenstufe'] := DBLookupComboBox4.text;
form3.Table1.FieldValues['Klasse'] := DBLookupComboBox5.text;
form3.Table1.FieldValues['Fach'] := DBLookupComboBox6.text;
form3.Table1.FieldValues['Materialien'] := DBLookupComboBox7.text;
form3.Table1.FieldValues['Lehrer'] := dbedit1.text;
form3.Table1.Post;
end;
end.
jetzt soll wenn die ersten vier fieldvalues bereits schon hintereinander in einem datensatz vorhanden sind eine fehlermeldung erscheinen und nicht der gleiche datensatz noch einmal in der tabelle auftachen. er soll nur speichern wenn nicht alle vier values schon mal hintereinander in einem datensatz vorhanden.
hoffe jemand hat eine ahnung ich weis einfach nich wie ich dass machen soll.
aber trotzdem schon mal danke an alle. (Ps.: bin anfänger und habe eine
paradox tabelle benutzt mitSql etc. konnte ich mich noch nicht anfreunden, vielleicht hat jemand ne einfache iddee die ich auch verstehe)