Checkbox nicht mehr erreichbar.

Für Fragen zur Programmiersprache auf welcher Lazarus aufbaut
Antworten
haderlump
Beiträge: 174
Registriert: Fr 18. Jan 2013, 09:29
OS, Lazarus, FPC: Windows 10, Windows XP, Lazarus 1.6
CPU-Target: Celeron

Checkbox nicht mehr erreichbar.

Beitrag von haderlump »

Hallo zusammen
zu Messzwecken möchte ich ein serielles Signal erzeugen.
Gestartet wird es durch setzen eines Hakens in einer checkbox. Das geht auch.
Hier der zugehörige Code.

Code: Alles auswählen

procedure TFehlermeldungen.testClick(Sender: TObject);
var byte1,byte2,byte3,byte4:byte;
begin
  while test.Checked do
  begin
       byte1 := 10;
        byte2 :=10;
        byte3 :=10;
        byte4 :=10;
        serialSend(byte1,byte2,byte3,byte4);

  end;
end;   
Jetzt möchte ich das Ganze auch wieder ausschalten, indem ich den Haken lösche. Leider geht das nicht, wahrscheinlich komme ich aus der Schleife nicht mehr raus.
Und es wird der Haken gar nicht mehr verändert.
Was mache ich da falsch?

Gruß Fritz

Mathias
Beiträge: 5089
Registriert: Do 2. Jan 2014, 17:21
OS, Lazarus, FPC: Linux (die neusten Trunc)
CPU-Target: 64Bit
Wohnort: Schweiz

Re: Checkbox nicht mehr erreichbar.

Beitrag von Mathias »

wahrscheinlich komme ich aus der Schleife nicht mehr raus.
Genau so ist es.

Code: Alles auswählen

       serialSend(byte1,byte2,byte3,byte4);
       Application.ProcessMessages; 
Evtl. hilft dies weiter.
Mit Lazarus sehe ich gün
Mit Java und C/C++ sehe ich rot

haderlump
Beiträge: 174
Registriert: Fr 18. Jan 2013, 09:29
OS, Lazarus, FPC: Windows 10, Windows XP, Lazarus 1.6
CPU-Target: Celeron

Re: Checkbox nicht mehr erreichbar.

Beitrag von haderlump »

Danke, das hat geklappt.

Antworten