Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Bußgeldrechner

    Delphi
    by Michael Habbe, 4. Dez 2008
  Hier mal ein Link für Dich zum Selbererstellen von Struktogrammen: http://www.strukted.de
  Ist zwar schon recht altertümlich :zwinker: , aber funktioniert nach einigem Hinnehmen der Bedienung. :gruebel:
  
  
  Michael
• Forum: Object-Pascal / Delphi-Language

  Re: Bußgeldrechner

    Delphi
    by Michael Habbe, 2. Dez 2008
  procedure TForm1.Button2Click(Sender: TObject);
  var
  zulgesch, gefgesch, bußgeld: Double;
  inort: String;
  punkte, fahrverbot: Integer;
  begin
  case radiogroup1.itemindex of
  0 : inort := 'ja';
  1 : inort := 'nein';
  end;