Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Sendtext-Problem .. (https://www.delphipraxis.net/5239-sendtext-problem.html)

Hanswurst 29. Mai 2003 09:26


Sendtext-Problem ..
 
Moin Leutz
ich hab da mal n Problem mit Sendtext ..
und zwar , wenn ich den TCPClient der Indy-komponenten nehme , dann als OnClick-Ereignis eines Buttons schreibe :

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
tcpclient.Socket.Sendtext(memo1.Text);
end;

dann meint der (beim Compillieren) "undefinierter Bezeichner : Sendtext"

was hab ich da falsch gemacht , oder heist der Befehl bei den Indys anders ???

THX 4 Help

Bis denn
CU

BungeeBug 29. Mai 2003 10:34

Hi,
im Normalfall hilf da schon die Auto-Vervollständigung ... aber ich will ja mal nicht so sein :) Das was du suchst heist aller Warscheinlichkeit nach -> SendString <- :)

MfG BungeeBug

Hanswurst 29. Mai 2003 15:59

guter tipp ..funzt trotzdem net ..
da sagt er auch :
Undefinierter Bezeichner 'SendString'

und außerdem hab ich das(bei sendtext) mit der Autovervollständigung gemacht ...

Steran 30. Mai 2003 12:02

Hi!

Funktionieren andere Eigenschaften von TCPClient.Socket (z.B. tcpClient.Socket.Open;)???

..oder bringt der compiler dann auch ne Fehlermeldung?

Hst du bei den Uses: "IdTCPClient" stehen?

MfG

Steran

Hanswurst 30. Mai 2003 14:09

Moin Leutz
ich hab in meinem Proggi noch diese befehle stehn :
tcpclient.Host:=edit1.Text;
tcpclient.Connect();
tcpclient.Disconnect;

die funzen alle ..
wenn ich SendText rauslasse , kann ich die Anwendung compilieren lassen und ..
die 3 Befehle (Host;Connect;Disconnect) funzen alle prächtig
nur eben dieser VERDAMMTE SendText-Bafehl net...

wenn wer da weiterweis ..
bitte posten ..

bis denn
cu

Hanswurst 4. Jun 2003 14:58

weis da echt NIEMAND was das sein kann ???
oder heist der befehl bei dem TCPClient der INDY-Komponenten anders !?!??!

THX 4 reply
CU

Christian Seehase 4. Jun 2003 16:24

Moin Hanswurst,

der INDY TCPClient kennt die Eigenschaft Socket doch gar nicht... zumindest bei mir (ist, glaub' ich Indy 8), deshalb würde hier schon diese Eigenschaft angemeckert werden.
Der "normale" ClientSocket hat diese Eigenschaft zwar, kennt aber auch SendText, so dass hier nicht gemeckert werden dürfte.

Was für eine Komponente verwendest Du denn?

Hanswurst 5. Jun 2003 12:21

Moin Leutz
ich hab mir mal die ganzen Threads durhchgelesen , die irgendwas mit SENDTEXT zu tun haben ..
hab aber nix zu meinem problem gefunden ..

@der,der vor mir was geschrieben hat:
ich verwende den stinknormalen IdTCPClient bzw IdTCPServer der IndyKomponenten (unter Indy-Client bzw Indy-Server zu finden)

und wie gesagt...
was muss ich machen , damit Sendtext funzt ??
da der Compiller ,wenn ich schreibe : IdTCPClient1.socket.sendtext('son dreck') , sogar mit der Autovervollständigung ;

"Undefinierter Bezeichner: "sendtext""


wenn ich schreibe :
"IdTCPClient1.se"
dann sagt mir die Autovervollständigung :
SendCMD
SendCMD
SendBufferSize und
SetSubComponent

wenn ich schreibe :
"IdTCPClient1.socket.s"
meint die Autovervollständigung :
Send(var ABuf:Ohne Typ;Alen:Integer):Integer;


aber nix mit Sendtext ..

Bitte Helft mir ..
ich bin auch nur ein Mensch ..
und die Lufttemperatur beträgt <30

THX

Christian Seehase 5. Jun 2003 14:23

Moin Hanswurst,

also so funzt das bei mir:

Delphi-Quellcode:
// Senden
procedure TForm1.Button1Click(Sender: TObject);
begin
  idTCPClient1.Connect;
  if idTCPClient1.Connected then begin
    try
      idTCPCLient1.OpenWriteBuffer;
      try
        idTCPClient1.WriteLn(Edit1.Text);
      finally
        idTCPClient1.CloseWriteBuffer;
      end;
    finally
      idTCPClient1.Disconnect;
    end;
  end;
end;

// Empfang
procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread);
begin
   Edit2.Text := AThread.Connection.ReadLn;
end;

Hanswurst 8. Jun 2003 16:01

Danke für deinen Tipp ..
es funzt ..
nur , wie kann ich dem Clienten (und nicht nur dem Server) sagen ,dass er die ganze Zeit bzw wenn er läuft/verbunden ist , auf Nachrichten aufpassen soll ..
also wie der Server mit :
procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread);
begin
Edit2.Text := AThread.Connection.ReadLn;
end;

da der Client kein OnExecute Ereignis besitzt und somit auch net mit dem AThread klar kommt ..

ich hab in der Autoverfollständigung nachgeschaut .. aber nix gefunden .. und bei den Ereignissen des Clienten auch nix ähnliches (das gefuntz hat) gefunden ..

da ja der Server auch zum Client labern muss/soll/braucht und nicht nur umgekehrt ..

THX
Bis denn
UC


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:26 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz