Benötige Hilfe für RS232 Schnittstelle

[moby]

Hallo Christian,

ja super, es funktioniert tatsächlich so, wenn ich Delphi nicht starte. Ich habe mit ProgressBar´s noch nie gearbeitet und bin einfach mal davon ausgegangen, das ich es so richtig programmiert habe. Aber in der ProgressBar zeigt es nie etwas an und in meinem Edit2 Fenster ladet es die ganze Zeit die Fehlermeldung und wird mit 1 durch mein inc erhöht. Versteh gerade nicht ganz, was ich da falsch gemacht habe. Ich habe ein Pollin Evulationsboard und auf diesem ein Programm, mit welchem ich an einem Poti drehe und dann auf dem LCD die Werte von 0-255 ausgebe. Diese Daten werden auch über die serielle Schnnittstelle übertragen. Im Edit1 Fenster erscheinen die Werte von 0-255. Auch wenn ich diesen Code

Delphi-Quellcode:

try
  ProgressBar1.Position := StrToInt(copy(Edit1.Text,7,3));
  //Edit2.Text := copy(Edit1.Text,7,3);
except
   inc (Fehler);
   Edit2.Text := 'Fehler: '+IntToStr(Fehler);
end;

weglasse und nur ProgressBar1.Position := StrToInt(Edit1.Text) schreibe, geht nichts. Oder geht das kann man diese nicht so programmieren?
Gruß moby