CheckBox

[blacky35]

Hallo und guten Morgen,

ich bin Anfänger und habe ein kleines Problem:

Ich möchte in einem Rahmen 4 CheckBoxen kreuzförmig platzieren.
Von den beiden jeweils gegenüberliegenden darf nur 1 ausgewählt werden können. D.h. max. können 2 ausgewählt sein. Entweder 1 senkrecht, oder 1 waagrecht.

Erlaubte Möglichkeiten sollen sein:

- keine ausgewählt
- 1 ausgewählt ( senkrecht oder waagrecht)
- 2 ausgewählt ( 1 senkrecht und 1 waagrecht)

Im Programm soll zu einem Grundwert 1 Wert addiert werden, in Abhängigkeit der ausgewählten Checkboxen.

Beispiel:

Grundwert = 1000

Links = 1000 + 500 wenn waagrecht.links
Vorne = 1000 + 300 wenn senkrecht.oben
Hinten = 1000 + 200 wenn senkrecht.unten
Rechts = 1000 + 100 wenn waagrecht.rechts

Ist keine CheckBox ausgewählt sind alle 4 Werte 1000

Wer kann mir hier zu einem Einstieg verhelfen.

mfG blacky

[Flogo]

Ich glaub ich hab noch nicht ganz verstanden wann welche Checkboxen aktiv sein sollen:
Du hast 4 Checkboxen so angeordnet:

Code:

A B
C D

und jetzt?

Wenn zB nur A oder B aktiv sein sollen kannst du in das OnClick von A das hier schreiben:

Delphi-Quellcode:

  Oben := GrundWert;
  if A.Checked then 
  begin
    B.Checked := false;
    Inc(Oben, 300);
  end;

Und bei B natürlich das entsprechende.

[Schuster]

So kannst du mal checken welche markiert sind:

Delphi-Quellcode:

    if CheckBox2.Checked=true then
    begin
        ShowMessage('Beide können nicht aktive sein');
    end
    else
    begin
        //Berechnungen durchführen
    end;

[blacky35]

danke,

werds probieren.

mfg blacky

[Die Muhkuh]

Zitat von Schuster:

So kannst du mal checken welche markiert sind:

Delphi-Quellcode:

    if CheckBox2.Checked=true then
    begin
        ShowMessage('Beide können nicht aktive sein');
    end
    else
    begin
        //Berechnungen durchführen
    end;

Hi,

sollte aber so heißen:

Delphi-Quellcode:

if CheckBox2.Checked then
begin
  ShowMessage('Beide können nicht aktive sein');
end
else
begin
  //Berechnungen durchführen
end;

Da sonst eine doppelte Prüfung durchgeführt werden muss (hab ich mal hier irgendwo gelesen)