Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.757 Beiträge
 
Delphi 10.4 Sydney
 
#10

Re: OOP - Neuling braucht ein bisschen Hilfe

  Alt 21. Mai 2010, 20:49
.. wenn alle Tips nicht helfen:

Delphi-Quellcode:
procedure TForm1.AnlegenClick(Sender: TObject);
begin
  case RadioGroup1.itemIndex of
   0 :
    begin
     M_Bezeichnung:= 'Verbrennungsmotor';
    end;
   1 :
    begin
     M_Bezeichnung:= 'Elektromotor';
    end;
   2 :
    begin
     M_Bezeichnung:= 'Hybridantrieb';
    end;
   3 :
    begin
     M_Bezeichnung:= 'Wasserstoffantrieb';
    end;
  end;
denn es ist der ItemIndex der sich ändert wenn
du einen RadioButton der RadioGroup anklickst.

OT:
was hat das mit OOP zu tun

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat