DBCheckBox ??

[Countdown2000]

Hi @ all !

Ich habe ein kleines Programm mit einer Paradox7 Tabelle !

In der Tabelle ist als 6te Spalte Verliehen !

Beim neueintrag in die Lieste wird automatich da Nein rein geschrieben !

Jetztt möchte ich das wenn ich eine weitere Form öffne die DBCheckbox ohne hacken ist wenn Da Nein in der liste ist und mit Hacken falls da Ja stehen sollte ! außerdem soll sich der Eintrag dadurch ändern wenn hacken drin ja wenn kein hacken nein !

Abgespeichert wird das durch einen Speicher Button wenn man den nicht drückt und das Fenster schließt soll keine änderung übernommen werden !

Also meine Frage : Wie geht das ??

[worker]

gewöhn dir mal an satzzeichen richtig zu setzen denn sonst ist es sehr schwierig für jemanden der bereit ist dir zu helfen überhaupt zu verstehen was du denn überhaupt möchtest ich glaube nicht dass viele leute lust haben deinen text ersteinmal zu zerlegen denn soviel zeit hat kaum jemand denk also dran hier ist alles freiwillig arbeite bitte auch entsprechend mit und formuliere deine anfragen so dass sie jeder beim ersten lesen versteht danke

[mirage228]

Also erstmal initialisiert Du einen neuen Datensatz mit der Insert Methode - oder öffnest einen bestehenden zum Bearbeiten mit Edit. Wenn Du die DB-Felder über die DataSource Komponente mit dem Query verbindest, kannst Du die Änderungen mit Post übernehmen oder CancelUpdates verwerfen.
Bei der DB CheckBox dürften Dich interessieren: ValueChecked und ValueUnchecked.

Viele Grüße

[Countdown2000]

OK OK alles schön und gut !

aber wie kann ich dem Programm sagen das er ein Hacken bei der DBcheckbox setzten muss, wenn der angewählte Tabelleneintrag unter der Spallte Verliehen ein "Ja" stehen hat ?

Sowas z.B.: ( ja ich weis das ist falsch ! )

if Table1.Spallte nr.6 = 'Ja' then
Begin
DBcheckbox1 := checked
end;

if Table1.Spallte nr.6 = 'Nein' then
Begin
DBcheckbox1 :=unchecked
end;

Wie schreibt man sowas richtig das es funktioniert ?

ps.: meine Hilfe funzt nicht! ist so eine scheiß buch version

[mirage228]

Du musst eine TDataSource Komponenten verwenden (im Zshg. mit Deiner Tabelle oder einem Query), diese dann der DBCheckBox zuweisen und dort die DataField auf den Spaltennamen setzen.