Ich habs jetzt so gelöst, in dem ich die sendende IP-Adresse mit meiner connecteten vergleiche.
den Sender erhalte ich da über aSocket.
Die Prozeduren funktionieren aber über das Componentenarray wie oben beschrieben einwandfrei.
Das hat mir viel Aufwand erspart.
Vielen Dank noch mal für die Tipps ...
Die Suche ergab 174 Treffer
- Do 25. Feb 2021, 09:51
- Forum: Einsteigerfragen
- Thema: [gelöst] TCheckbox platzieren und zugreifen
- Antworten: 9
- Zugriffe: 1994
- Mi 24. Feb 2021, 12:22
- Forum: Einsteigerfragen
- Thema: [gelöst] TCheckbox platzieren und zugreifen
- Antworten: 9
- Zugriffe: 1994
Re: TCheckbox platzieren und zugreifen
bei einem TButton hab ich "Sender" und "as TButton"
bei meiner Component hab ich TLTCPComponent
aber als Sender steht da halt aSocket und ein TTLSocket
was muß da stehen myCompo := xxx as yyy;
oder geht das so nicht?
Ich hab da mehrere TLTCPComponent
TLTCPComponent1
TLTCPComponent2
TLTCPComponent3 ...
bei meiner Component hab ich TLTCPComponent
aber als Sender steht da halt aSocket und ein TTLSocket
was muß da stehen myCompo := xxx as yyy;
oder geht das so nicht?
Ich hab da mehrere TLTCPComponent
TLTCPComponent1
TLTCPComponent2
TLTCPComponent3 ...
- Mi 24. Feb 2021, 09:55
- Forum: Einsteigerfragen
- Thema: [gelöst] TCheckbox platzieren und zugreifen
- Antworten: 9
- Zugriffe: 1994
Re: [gelöst] TCheckbox platzieren und zugreifen
So, alles umgebaut und funktioniert prima. Vielen Dank dafür.
Einzig eine Baustelle bekomme ich nicht hin.
procedure TForm1.FNetClientRBGXConnect(aSocket: TLSocket);
var
Nr : integer;
myCompo: TLTCPComponent;
i: integer;
begin
myCompo := xxx as yyy;
for i := 1 to 10 do begin
if myCompo ...
Einzig eine Baustelle bekomme ich nicht hin.
procedure TForm1.FNetClientRBGXConnect(aSocket: TLSocket);
var
Nr : integer;
myCompo: TLTCPComponent;
i: integer;
begin
myCompo := xxx as yyy;
for i := 1 to 10 do begin
if myCompo ...
- Di 23. Feb 2021, 20:20
- Forum: Einsteigerfragen
- Thema: [gelöst] TCheckbox platzieren und zugreifen
- Antworten: 9
- Zugriffe: 1994
Re: TCheckbox platzieren und zugreifen
Das geht ja fast in Echtzeit.
Was da alles mit Lazarus geht, schon Wahnsinn.
Ich bin jedes mal aufs Neue von Lazarus begeistert.
Allerdings zeigt mir das jedes mal wie weit ich von der "Weisheit" weg bin.
Vielen Dank für eure Hilfe
Gruß
NoCee
Was da alles mit Lazarus geht, schon Wahnsinn.
Ich bin jedes mal aufs Neue von Lazarus begeistert.
Allerdings zeigt mir das jedes mal wie weit ich von der "Weisheit" weg bin.

Vielen Dank für eure Hilfe
Gruß
NoCee
- Di 23. Feb 2021, 19:08
- Forum: Einsteigerfragen
- Thema: [gelöst] TCheckbox platzieren und zugreifen
- Antworten: 9
- Zugriffe: 1994
[gelöst] TCheckbox platzieren und zugreifen
Hallo zusammen,
ich versuche gerade auf einer Form mehrere Checkboxen visuell zu platzieren
und das .checked über einen Index zu setzen.
Quasi wie bei einem array.
mycheckbox .checked:=true;
Da die Checkboxen aber visuell auf die Form kommen, gibts ja keinen Index.
Es gibt z.B.
myCheckbox1 ...
ich versuche gerade auf einer Form mehrere Checkboxen visuell zu platzieren
und das .checked über einen Index zu setzen.
Quasi wie bei einem array.
mycheckbox .checked:=true;
Da die Checkboxen aber visuell auf die Form kommen, gibts ja keinen Index.
Es gibt z.B.
myCheckbox1 ...
- Mi 17. Feb 2021, 09:01
- Forum: Einsteigerfragen
- Thema: Mehrere geöffnete Formulare
- Antworten: 40
- Zugriffe: 6840
Re: Mehrere geöffnete Formulare
Hallo,
PageControl keine Option?
Alles Seiten da, Navigation easy.
Gruß
NoCee
PageControl keine Option?
Alles Seiten da, Navigation easy.
Gruß
NoCee
- Mi 3. Feb 2021, 13:44
- Forum: Einsteigerfragen
- Thema: Zeitgesteuerte Aktionen
- Antworten: 11
- Zugriffe: 2104
Re: Zeitgesteuerte Aktionen
Im Prinzip hab ich das ähnlich gemacht.
//setzen
if (frac(now) >= Dateiwechselzeit) and (not Dateigewechselt) then machwas;
//zurücksetzen
if frac(now) < Dateiwechselzeit then Dateigewechselt:= false;
die Dateiwechselzeit steht in einem INI-File
Das zurücksetzen hab ich nicht genau um eine ...
//setzen
if (frac(now) >= Dateiwechselzeit) and (not Dateigewechselt) then machwas;
//zurücksetzen
if frac(now) < Dateiwechselzeit then Dateigewechselt:= false;
die Dateiwechselzeit steht in einem INI-File
Das zurücksetzen hab ich nicht genau um eine ...
- Di 6. Okt 2020, 11:15
- Forum: Dies und Das
- Thema: Alte HDD
- Antworten: 46
- Zugriffe: 10792
Re: Alte HDD
Ich hab mir für die Technikerschule Fachrichtung Datenverarbeitung einen AT 1 MByte Ega-Karte 5 1/4 Zoll Floppy und 20MByte Platte gekauft
und hab dafür ohne Bildschirm auch schon 6500DM berappen dürfen.
Und wurde dafür richtig beneidet.
Mir hats enorm geholfen weil ich zuhause "Pascal" lernen ...
und hab dafür ohne Bildschirm auch schon 6500DM berappen dürfen.
Und wurde dafür richtig beneidet.
Mir hats enorm geholfen weil ich zuhause "Pascal" lernen ...
- Do 6. Aug 2020, 12:11
- Forum: Einsteigerfragen
- Thema: In den Tastaturpuffer schreiben
- Antworten: 7
- Zugriffe: 2448
Re: In den Tastaturpuffer schreiben
Hallo,
das soll momentan nur auf Windows laufen.
Fremdsoftware möchte ich nicht einsetzen, da kann ich gleich den Arduino dran lassen.
Ich hab das mal nach dieser Seite probiert.
http://www.tech-ecke.de/index_quereinstieg.htm?/delphi/tastendruck_simulieren.htm
Das tut schon mal das was ich ...
das soll momentan nur auf Windows laufen.
Fremdsoftware möchte ich nicht einsetzen, da kann ich gleich den Arduino dran lassen.
Ich hab das mal nach dieser Seite probiert.
http://www.tech-ecke.de/index_quereinstieg.htm?/delphi/tastendruck_simulieren.htm
Das tut schon mal das was ich ...
- Mi 5. Aug 2020, 11:09
- Forum: Einsteigerfragen
- Thema: In den Tastaturpuffer schreiben
- Antworten: 7
- Zugriffe: 2448
In den Tastaturpuffer schreiben
Hallo zusammen,
ich muß eine Paletten Nummer in eine Fremdsoftware bekommen.
Ein Barcodescanner ließt diese und schickt sie mir übers Netzwerk auf den entsprechenden Rechner.
Da läuft meine und die Fremdsoftware drauf. Mein jetziger Trick ist der Umweg über einen Arduino.
Per Com an den Arduino und ...
ich muß eine Paletten Nummer in eine Fremdsoftware bekommen.
Ein Barcodescanner ließt diese und schickt sie mir übers Netzwerk auf den entsprechenden Rechner.
Da läuft meine und die Fremdsoftware drauf. Mein jetziger Trick ist der Umweg über einen Arduino.
Per Com an den Arduino und ...
- Fr 12. Jun 2020, 15:54
- Forum: Dies und Das
- Thema: PC startet nicht
- Antworten: 7
- Zugriffe: 2618
Re: PC startet nicht
Ich kann erster Antwort nur Zustimmen.
Typisches Netzteilproblem, schwingt nicht mehr an.
Gemessene Kondensatoren von den Werten total daneben.
Hab ich oft. PC läuft Monate/Jahre durch.
Stundenlang ausgeschaltet, nichts geht mehr.
Nur ein paar Minuten ausschalten, geht oft noch.
Irgendwann auch ...
Typisches Netzteilproblem, schwingt nicht mehr an.
Gemessene Kondensatoren von den Werten total daneben.
Hab ich oft. PC läuft Monate/Jahre durch.
Stundenlang ausgeschaltet, nichts geht mehr.
Nur ein paar Minuten ausschalten, geht oft noch.
Irgendwann auch ...
- Mo 8. Jun 2020, 21:48
- Forum: Einsteigerfragen
- Thema: [Gelöst] Im Memo unten Leerzeile verhindern
- Antworten: 2
- Zugriffe: 1158
Re: Im Memo unten Leerzeile verhindern
Natürlich nicht, man, manche Sachen sind doch so trivial.TMemo ist ein Editor.
Benutzt du die Komponenten überhaupt als Editor?
Ich hab sowas immer mit einem TMemo gemacht.
Aber mit besagter TListbox tut das jetzt genau was es soll.
Wieder was gelernt.
Vielen Dank für die Hilfe
Gruß
NoCee
- Mo 8. Jun 2020, 09:40
- Forum: Einsteigerfragen
- Thema: [Gelöst] Im Memo unten Leerzeile verhindern
- Antworten: 2
- Zugriffe: 1158
[Gelöst] Im Memo unten Leerzeile verhindern
Hallo zusammen,
ich hab ein Memo in das ich mit Memo.append() Zeilen reinschreibe.
Dabei werden immer die gleiche Anzahl an Zeilen komplett eingefügt
Vorher wird das Memo mit Clear leer gemach.
Eine unschöne 'Sache krieg ich allerdings nicht hin.
Nach einem .add der letzten Zeile gibt's (wie vorher ...
ich hab ein Memo in das ich mit Memo.append() Zeilen reinschreibe.
Dabei werden immer die gleiche Anzahl an Zeilen komplett eingefügt
Vorher wird das Memo mit Clear leer gemach.
Eine unschöne 'Sache krieg ich allerdings nicht hin.
Nach einem .add der letzten Zeile gibt's (wie vorher ...
- Mo 30. Mär 2020, 11:16
- Forum: Netzwerk
- Thema: Fehler bei lnet-Installation / lnet-Tutorials?
- Antworten: 7
- Zugriffe: 10234
Re: Fehler bei lnet-Installation / lnet-Tutorials?
Hast du LNet über den Onlinepaketmanager geholt?
Das hat bei meiner Komplettneuinstallation nach Systemalleskaputt auch nicht hingehauen.
Lazarus hat da alles mögliche von LNet nicht gefunden.
Da hat irgend etwas mit dem Onlinemanager einen Bug. Hab ich dann auch irgendwo gelesen.
Ich hab dann LNet ...
Das hat bei meiner Komplettneuinstallation nach Systemalleskaputt auch nicht hingehauen.
Lazarus hat da alles mögliche von LNet nicht gefunden.
Da hat irgend etwas mit dem Onlinemanager einen Bug. Hab ich dann auch irgendwo gelesen.
Ich hab dann LNet ...
- Mo 23. Mär 2020, 20:27
- Forum: Netzwerk
- Thema: [erledigt] LNet einzelnen Server Socket schließen
- Antworten: 12
- Zugriffe: 13478
Re: LNet einzelnen Server Socket schließen
Ok
danke für den Hinweis.
Auf der Seite war ich logischerweise schon.
Nur mit dem was da auf der Seite steht konnte ich nicht all zu viel anfangen.
Ich hab spaßeshalber mal von einer anderen Seite Synapse runter geladen und siehe da
Beispiele sind da. Wird halt beim Onlinepaketmanager nicht mir ...
danke für den Hinweis.
Auf der Seite war ich logischerweise schon.
Nur mit dem was da auf der Seite steht konnte ich nicht all zu viel anfangen.
Ich hab spaßeshalber mal von einer anderen Seite Synapse runter geladen und siehe da
Beispiele sind da. Wird halt beim Onlinepaketmanager nicht mir ...