Thema: Delphi Programm Hilfe

Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
26.824 Beiträge
 
Delphi 10.3 Rio
 
#150

AW: Programm Hilfe

  Alt 30. Okt 2011, 10:12
Dann machst Du wohl was falsch.

[edit] Ein Beispiel für die generelle Logik:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  Zahl, Zaehler: integer;
begin
  Zahl := 10000;
  Zaehler := 0;
  repeat
    Zahl := Zahl div 10;
    Zaehler := Zaehler + 1;
  until Zahl < 10;
  ShowMessage('Duchläufe: ' + IntToStr(Zaehler));
end;
[/edit]
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen

Geändert von DeddyH (30. Okt 2011 um 10:14 Uhr)
  Mit Zitat antworten Zitat