-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
3. Nov 2014
Hallo Anton
Natürlich darf man das.
Das kann ich so nicht beurteilen. Wenn die Schleife jedenfalls in einem eigenen Thread läuft, braucht man es evtl. nicht, da der Thread seine eigene Message-Loop hat.
Ich denke ja.
-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
3. Nov 2014
Ich versuchs mal zu erklären:
Windows ist ein Nachrichtenbasiertes System. Ein Windows-Programm wird von der Message-Loop gesteuert. In Delphi bekommt man die nicht zu Gesicht. Die verbirgt sich hinter dem Aufruf Application.Run in der .dpr- Datei deines Projektes.
Grob gesagt schickt jede Aktion wie z.B. ein Button-Klick eine Message an Windows, die dann in der Message-Loop verarbeitet...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
3. Nov 2014
Hallo Anton,
läuft das case Status.CNC.ZBETR of immer noch in der Schleife repeat until not(ord(Status.CNC.ZBETR) in ); ?
Wenn ja, wird da auch irgendwo Application.ProcessMessages aufgerufen?
Ist denn das Programm generell noch bedienbar, d.H. kannst du Form2 mit dem X schließen?
-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
31. Okt 2014
Genau,
und auf den Thread kannst meiner Meinung mach auch verzichten, wenn Du den CNC-Datenempfang in eine Methode deines Mainforms auslagerst, z.B. so: (zumindest vorerst, bis alles läuft)
type
TForm1 = class(TForm)
...
private
procedure PerformCNCData;
...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
31. Okt 2014
OK, da ist auch noch ein Thread involviert. Das macht das Ganze auch nicht gerade einfacher.
Das scheint mir alles ziemlich ineinander verflochten zu sein. Ich denke, du hast zwei Möglichkeiten:
1. Du machst die die Mühe und zerpflückste es und schreibt es windowskonform neu. Dazu gehört dann auch dass man Ausgaben nicht einfach mit Canvas.TextOut auf den Canvas malt, sonder dass alle...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
31. Okt 2014
Ich denke, du solltest dich erst mal ein bischen mit der Windows-Programmierung und der objektoriententierten Programmierung unter Delphi vertraut machen. Das war wahrscheinlich mal ein DOS-Programm. Das kann man aber nicht einfach 1:1 nach Windows umsetzen.
Unter Windows wird der Programmablauf von Messages gesteuert, auf die man in Delphi in den entsprechenden Ereignissen reagieren kann.
...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
31. Okt 2014
Das muss aber gehen. Ich vermute, das Problem liegt ganz woanders.
Der Focus hat doch nichts mit dem Canvas tun.
Zeig doch mal ein bischen Code. Wo machst du denn den Bildaufbau? Der gehört ins OnPaint der Paintbox (oder des Forms, wenn du direkt auf das Form malst).
Lass das Form2 weg und schreib einfach Edit1.SetFocus. Innerhalb einer Form-Klasse auf die eigene Form-Variable...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
31. Okt 2014
In einen Canvas kann man nichts eingeben, darauf kann man nur zeichnen. Alternativ zu pelzigs Vorschlag könntest du auch ein TEdit benutzen, dass ständig den Focus hat. Im OnKeyDown des TEdits reagierst du dann auf Sondertasten wie F1 bis F10 oder deine anderen Steuertasten. Wenn die ankommenden Zeichen als Koordinateneingabe interpretiert werden (wie das unterschieden wird, weißt du selbst am...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
30. Okt 2014
Wenn ich dich richtig verstehe, malst du deine Ausgabe auf den Canvas des Form.
Und wo sollen die Koordinaten dann später eingegeben werden?. Du könntest doch deine Ausgabe auch in eine Paintbox malen, die nicht das ganze Form ausfüllt und z.B. oberhalb noch ein Editfeld oder sonstige sinnvolle Komponenten reinsetzen.
-
Forum: Sonstige Fragen zu Delphi
Delphi
by bcvs,
30. Okt 2014
Wenn ich das richtig verstehe, sollen da keine langen Texte eingegeben werden, sondern nur ein Zeichen zur Programmsteuerung. Dann könnte man doch einfach im OnKeypress des Forms auf den Tastendruck reagieren.
Evtl. muss KeyPreview auf true gesetzt werden.
