Einzelnen Beitrag anzeigen

Benutzerbild von ChrisE
ChrisE

Registriert seit: 15. Feb 2006
Ort: Hechingen
504 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#13

Re: TSpinEdit und Zahlen mit ner 0 aufstocken zum senden ?

  Alt 17. Nov 2008, 13:49
Hallo Lightbeam

aber ich hab dir mit dem Quelltext genau das gegeben was divBy0 gesagt hat. Nur beim Senden ist es wichtig das die "0" vorne steht und nicht im UserInterface (also Deiner SpinEdit). Genau das macht der Quelltext

Gruß, Chris

P.S.:
Der Aufruf der Methode könnte dann so aussehen:

Delphi-Quellcode:
// in der Ereignisbehandlungsroutine für das Senden
try
  SendWert := StrToInt(SpinEdit.Wert);
except
  SendWert := -1; // als Marker das was schief ging
end;
if (SendWert >= 0) and (SendWert<=255) then
begin
  UebertrageWert(SendWert);
end else
begin
  // User Informieren das das so nicht geht :-)
end;

// und alles andere was so nötig ist in dieser Methode...
@Edit: Vergessen, dass SpinEdit.Wert ja alles sein kann
Christian E.
Es gibt 10 Arten von Menschen, die die Binär lesen können und die die es nicht können

Delphi programming rules
  Mit Zitat antworten Zitat