[FreePascal/lNet] Kein "Empfang" von Nachrichten

[xZise]

Hallo DP,
ich habe ein Problem mit den lNet Komponenten.

Und zwar kriege ich es nicht hin, Nachrichten zu empfangen. Ich habe Listen eingestellt (korrekter Port), und auch das Ereignis miteinander verknüpft, aber es kommt einfach nichts an!

Ich habe schon einen Post im http://www.lazarusforum.de/viewtopic.php?t=1771 erstellt. Aber hier sind eindeutig mehr Programmierer und FreePascal ist ja nicht soooo weit weg von Delphi :)

MfG
xZise

[Corpsman]

ich habs mit SDL.dll problemlos hinbekommen.

ich wie nicht ob das ne alternative für dich ist.

[xZise]

Wie sieht das mit der Verwendung unter Linux aus?

MfG
xZise

[Corpsman]

ich hab Pentago damit gemacht. und wie du sehen kannst gehts Problemlos unter Win und unter Linux. Ich denke das liegt aber auch daran das ich ne NonVCL anwendung gemacht habe.

[xZise]

Naja ich mein, irgendwie müsste das mit lNet funktionieren.

MfG
xZise

[christian_u]

hast du dich mal bemüht in die doku zu schaun ?
lnet hat eine prozess funktion die zyklisch aufgerufen werden muss. wenn du die visuellen lazarus komponenten benutzt wird das automatisch über die applikationsschleife gemacht wenn du die komponenten manuell benutzt musst du die selbst zyklisch aufrufen.

[xZise]

Naja... Und welche Methode muss ich zyklisch aufrufen? "GetMessage" oder was?

MfG
xZise

[inherited]

Wenn du es in nicht grafischen Anwendungen benutzt, musst du glaube ich CallAction regelmäßig aufrufen.
Wenn das nicht klappt, versuch mal den Host vorher auf "*" zu setzen, das ist nur eine Vermutung.
Wenn alles nichts hilft, frag mal im Channel #lnet auf irc.freenode.net nach.

[xZise]

naja... Es handelt sich um eine GTK+ Anwendung.
Aber die Komponente erzeuge ich dynmaisch :) Ich weiß nicht ob das wichtig ist?

MfG
xZise

[inherited]

Das weiß ich leider nicht, ich werde mich aber mal erkundigen.

[xZise]

So hab einfach mal im IRC gefragt. Ergebnis ist bisher: Deren Beispiel funktioniert nur mein Programm nicht.

Eine Möglichkeit wäre, dass die Zuordnung falsch ist:

Delphi-Quellcode:

FUDP := TLUDPComponent.Create(nil);
FUDP.OnReceive := @FUDPReceive;

MfG
xZise

[inherited]

probier doch mal als Owner deine GTK-Form anzugeben.

[xZise]

Ein Zitat aus dem Chat:

Zitat:

xZise> Set the owner of the Componet to the mainform :)
[...]
<Almindor> that won't fix anything

Und soweit ich das gesehen habe hat Almindor damit recht behalten.

MfG
xZise

[DGL-luke]

schau doch mal, ob du in der klassendefinition was hast, das aussieht wie "pollevents" oder "update" oder "action" oder "callactions" oder "process" oder oder oder...

[xZise]

Es gibt ein CallActions, aber soweit ich das verstanden habe, müssen die bei graphischen Anwendungen nicht ausgeführt werden.

MfG
xZise

[sx2008]

Du musst erst mal sicherstellen, dass die UDP-Daten deinen Rechner überhaupt erreichen; sonst jagst du einen Phantom nach.
Schnapp dir den Netzwerksniffer Wireshark und setze den Filter "udp".

[inherited]

kannst du das projekt evtl. mal anhängen oder mir schicken?

[xZise]

Jo :)
Hier ist die Datei ;)

Außerdem der Trafficverkehr.

MfG
xZise

[sx2008]

Zitat:

Zitat von xZise

Außerdem der Trafficverkehr.

Da ist was faul und zwar [UDP CHECKSUM INCORRECT].
Ich vermute mal, das Problem ist beim Sender zu suchen.
Du verwendest ja nur einen Rechner.
Ich hatte beim senden/empfangen von UDP auf dem gleichen Rechner auch schon Probleme.
Mit zwei versch. Rechnern klappte es dann.

[xZise]

Jap :)
Der Almindor (aus dem IRC) hat damit auch Probleme.

Und ehrlich gesagt: Unter Windows hatte ein anderes Programm (wo ich auch UDP verwendet habe) auch immer rumgemeckert wenn es zweimal gestartet wurde.

Außerdem habe ich immer .Connect .SendMsg und .Disconnect gemacht, was nicht so günstig ist. Aber ob das daran liegt: kA da ich nur ein Recher atm habe.

MfG
xZise

[inherited]

.Connect blockt nicht! Das heißt du musst nach dem Connect-Aufruf warten, bis das OnConnect(ed)-Event des Client gefeuert wird, bevor du sendMsg aufrufen kannst.

[xZise]

Es handelt sich um UDP ;) Dort wird keine Verbindung aufgebaut, sondern einfach gesendet.

MfG
xZise

[inherited]

:wall: Stimmt, verwende mal trotzdem das "OnCanSend"-Event

[xZise]

So... Ich habe mir nochmal alles von Alminodr angeguckt und es umgesetzt (kein .Connect/.Disconnect verwenden).

Nun lief es dann nicht, aber dann habe ich mal gegeuckt was den die Firewall sagt :wall: Naja... Dort standen ein paar Einträge :mrgreen:

MfG
xZise