Autor Beitrag
mircojaeger
Hält's aus hier
Beiträge: 13

WIN XP,WIN Vista
Delphi 7 Enterprise
BeitragVerfasst: Di 07.04.09 08:11 
hi@all,

warum funzt das so nicht?
ausblenden Delphi-Quelltext
1:
2:
3:
4:
procedure Tfrm_main.btn_showClick(Sender: TObject);
begin
  if rb_schuhe.Checked := true then edt_ausgabe.Text :='groesse 43';
end;


mfg
mircojaeger

Moderiert von user profile iconmatze: Delphi-Tags hinzugefügt
BenBE
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 8721
Erhaltene Danke: 191

Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
BeitragVerfasst: Di 07.04.09 08:15 
Bitte nutze Delphi-Tags, damit dein Source farbig hervorgehoben wird.
user profile iconmircojaeger hat folgendes geschrieben Zum zitierten Posting springen:
hi@all,

warum funzt das so nicht?

Du hast da doch sicherlich eine Fehlermeldung dazu? ;-)

user profile iconmircojaeger hat folgendes geschrieben Zum zitierten Posting springen:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
procedure Tfrm_main.btn_showClick(Sender: TObject);
begin
  if rb_schuhe.Checked := true then edt_ausgabe.Text :='groesse 43';
end;


mfg
mircojaeger

Den Farbig markierten Teil einfach weglassen. Siehe hier.

Ggf. hilft Dir auch der Crashkurs Delphi von user profile iconChristian S.

_________________
Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.
mircojaeger Threadstarter
Hält's aus hier
Beiträge: 13

WIN XP,WIN Vista
Delphi 7 Enterprise
BeitragVerfasst: Di 07.04.09 08:29 
danke!

nächste frage:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
 if  rb_schuhe.Checked:=false , rb_hose.Checked:=false ,
     rb_polo.Checked:=false , rb_jacke.Checked:=false ,
     rb_hemd.Checked:=false , rb_tshirt.Checked:=false , 
 then
    edt_ausgabe.Text :='Bitte Kleidung auswählen!!!';

wie kann ich "sagen" dass wenn keiner der radiobutton aktiviert ist er die meldung bitte kleidung auswählen anzeigt?
also wie kann ich bei if mehrere dinge abfragen?

mfg
mircojaeger

Moderiert von user profile iconmatze: Delphi-Tags hinzugefügt
Nersgatt
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1581
Erhaltene Danke: 279


Delphi 10 Seattle Prof.
BeitragVerfasst: Di 07.04.09 08:38 
Das := benutzt man nur für Zuweisungen. Wenn man etwas auf Gleichheit testen möchten, nimmt man nur das =
Außerdem kann man Boolsche Ausdrücke mit NOT negieren. IF not chk.Checked...

Gruß,
Jens

_________________
Gruß, Jens
Zuerst ignorieren sie dich, dann lachen sie über dich, dann bekämpfen sie dich und dann gewinnst du. (Mahatma Gandhi)
BenBE
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 8721
Erhaltene Danke: 191

Win95, Win98SE, Win2K, WinXP
D1S, D3S, D4S, D5E, D6E, D7E, D9PE, D10E, D12P, DXEP, L0.9\FPC2.0
BeitragVerfasst: Di 07.04.09 08:40 
Normal nur eine Frage pro Thread, hier geht's aber mal (ausnahmsweise) ;-)

ausblenden Delphi-Quelltext
1:
2:
if not (rb_schuhe.Checked or rb_hose.Checked or rb_polo.Checked or rb_jacke.Checked or rb_hemd.Checked or rb_tshirt.Checked) then 
  edt_ausgabe.Text :='Bitte Kleidung auswählen!!!';

_________________
Anyone who is capable of being elected president should on no account be allowed to do the job.
Ich code EdgeMonkey - In dubio pro Setting.
mircojaeger Threadstarter
Hält's aus hier
Beiträge: 13

WIN XP,WIN Vista
Delphi 7 Enterprise
BeitragVerfasst: Di 07.04.09 08:42 
danke!

werd demnächst immer nur eine frage pro thread machen;-)
Timosch
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
Beiträge: 1314

Debian Squeeze, Win 7 Prof.
D7 Pers
BeitragVerfasst: Di 07.04.09 10:15 
Zu allererst solltest du dir vielleicht ein Grundlagentutorial durchlesen...

_________________
If liberty means anything at all, it means the right to tell people what they do not want to hear. - George Orwell