我尝试发送电子邮件，但我遇到了问题，然而，我在网上找到了这段代码:UsesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,IdMessage,IdTCPConnection,IdTCPClient,IdMessageClient,IdSMTP,IdBaseComponent,IdComponent,IdIOHandler,IdExplicitTLSClientServerBase,IdSMTPBaseprocedureSendSimpleMail;varMsg:TId
我有一个实现TCP服务器的DelphiFiremonkey应用程序。服务器未按预期打开端口。我可以看到表格打开，但netstat显示端口未打开。我现在正尝试通过放置日志消息来调试此问题。问题是我以前从未使用过Firemonkey。我不确定在哪里可以看到日志消息。我已经声明了一个日志服务。LoggingService:IFMXLoggingService;然后我初始化它LoggingService:=FMX.Platform.TPlatformServices.Current.GetPlatformService(IFMXLoggingService)asIFMXLoggingServi
我想从服务运行IndyServer，我使用了以下代码但没有任何反应。当我运行该服务时，我在启动服务器时没有收到任何异常，但是当我尝试连接时也没有收到“已连接”消息。我是做错了还是这件事不可能？服务器代码在普通应用程序中进行了测试，没问题，它可以接收连接。我刚开始学习服务，我读了一些教程，他们说服务的一个非常常见的用途是检查应用程序的更新，所以我认为我的服务器应该可以工作...unitUnit1;interfaceusesWindows,Messages,SysUtils,Classes,Graphics,Controls,SvcMgr,Dialogs,IdBaseComponent,I
试图在标题中描述我的大部分问题，我基本上做到了。基本上，我在Lazarus中使用Indy10制作了自己的小型TCP服务器。它所做的只是接受字节形式的数据包，这些数据包包含代表英文字母的某个char。我正在使用Context的IOHandler读取这些字节，如下所示:procedureTServerSideForm.OnExecuteServer(Context:TIdContext);varIO:TIdIOHandler;keyPressed:char;begin//IO:=Context.Connection.IOHandler;ifnot(IO.InputBufferIsEmpty
我去过Indy下载页面，但指向TCP演示的唯一链接(页面上的最后一个)链接似乎都已损坏。在Yahho组中也提到了一些演示，但该页面已消失。有谁知道我在哪里可以找到一个非常简单的TCP客户端/服务器的Indy演示(最好不使用SSL，只是为了简单起见)？只是发送一些数据，也许带有一个Ack...预先感谢您的帮助。回答:(对于其他有类似问题的人)我要学习ExchangingDataovertheNetworkusingDelphi 最佳答案 我不知道你访问的是哪个下载页面，但是所有的链接都在官方Indydemosdownloadpage对
我不明白为什么一个简单的请求和响应需要400毫秒才能完成。它只需要不到1毫秒就可以在本地主机上完成(环回)。当我从我的虚拟机向我的主要开发机器发出请求时，需要400毫秒才能完成。最多需要40毫秒。这是一个HTTP请求最多需要多少，所以TCP应该更快。这是客户端和服务器的代码。我只是看不出我在哪里浪费时间。如果您需要更多信息，我可以介绍。代码与Indy9和10兼容，这就是IFDEF-s的原因。而且连接已经建立，没有连接部分需要400毫秒，只有数据发送和响应。functionTIMCClient.ExecuteConnectedRequest(constRequest:IMessageDa
如何从一个Timage(客户端)发送到另一个Timage(服务器端)？我将delphiXE3与idtcpclient1、idtcpserver1(indy10组件)一起使用。我已经尝试过做一些事情，但遇到了一些麻烦。服务器端:FileStream:=TFileStream.Create('ciao.jpg',fmCreate);AContext.Connection.IOHandler.LargeStream:=True;AContext.Connection.IOHandler.ReadStream(FileStream);FileStream.Free;image1.Picture
我有一个IndyTCP服务器，客户端连接到它，发送信息，服务器接收，创建一个巨大的TStringList并发送回客户端。这种情况每天发生数千次，所以我决定将六台服务器放在不同的.exe上，在不同的端口上执行相同的操作，并让客户端应用程序每次连接到一个随机端口。发生了什么:1)从客户第一次尝试连接到他收到他需要的所有信息的那一刻是相当高的，就像他做了两次工作。2)大约有10%的时间客户端尝试连接，而服务器似乎忽略了该尝试，并且客户端没有触发except重试，然后卡住了。服务器:MaxConnections设置为1ListenQueue为0TerminateWaitTime到5000Reu
您好，是否可以创建充当tcp代理服务器的中间应用程序？它将由两个组件组成。IdTCPServer和IdTCPClient。想法是:Application>连接到IdTCPServer>所有数据都被重定向到>IdTCPClient连接到目标。并且TCPClient收到的数据会重定向到IdTCPServer和Application。我做了这么简单的应用程序，它在HTTP请求中工作，但是当我尝试将它用于RDP客户端时它失败了(我收到协议(protocol)错误的错误消息)。有可能吗？我使用ReadByte方法，每个字节都发送到另一个IOHandler。我想创建某种允许通过NAT连接的虚拟TC
我目前正在尝试使用Indy在TCP之上编写自定义的更高级别的协议(protocol)。本质上，我想发送一条记录(使用流)，但这条记录可以指示后面的x个字节将是一个图像文件。因此，当服务器收到记录时，如果它的内容表明它后面有图像，则需要将记录和图像数据分开。varSegment:TDPPSegment;Segment2:TDPPSegment;Buffer:TIdBytes;Buffer2:TIdBytes;Mem:TMemoryStream;beginif(Client.Connected)thenbeginSegment.NameStr:='Adrian';Segment2.Name
