Entwickler-Ecke

Sonstiges (Delphi) - Zahlen teilen

Andreas L. - Mo 10.02.03 16:39
Titel: Zahlen teilen

Hi,
Wie kann ich eine Zahl die in einen Edit eingegeben wird durch die Zahl 56 teilen? PER BUtton klick!

smiegel - Mo 10.02.03 16:48

Hallo,

quick and dirty:

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

prcedure TForm1.Button1Click(Sender:TObject);
var aZahl:Integer;
begin
  try
    aZahl:=StrToInt(Edit1.Text); // oder StrToFloat für Fließkomma
    ShowMessage('Ergebnis: '+IntToStr(aZahl Div 56));
  except
    on EConvertError do
      ShowMessage('Text '+Edit1.Text+' ist keine Zahl');
  end; // try
end;

AXMD - Mo 10.02.03 16:54

Hi,

@ONLINEHOME: willst du einen Integer oder einen Float durch 56 teilen. Sonst verwendest du eben StrtoFloat. Ergebnis: Int oder Float? Wieder: FloattoStr.

So long,
AXMD

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!