1.用Delphi开发一个课堂教学管理软件,源码怎么实现当这段程序分别在两台电脑上运行时,源码实现彼此的源码大神一键重装系统源码错误通讯呢
2.delphi 7ä¸tcpserver å tcpclientçè¿ç¨
3.å¦ä½ç¨ DELPHI è·å CPU çåºåå·
用Delphi开发一个课堂教学管理软件,怎么实现当这段程序分别在两台电脑上运行时,源码实现彼此的源码flash锚点源码通讯呢
肯定要联网啦,不联网怎么通讯。源码jre7源码TCP方式、源码UDP方式,源码...,源码你认为哪种合适你你就用哪种,源码网上下载一个Indy的源码软件包,其中附带有示例程序,源码很多通讯的源码delphi 取网页源码例子,用来改一下就可以。源码也可以用数据库方式,源码ajax获取div源码比如安装一台SQLSERVER服务器,按数据库应用来编程。
delphi 7ä¸tcpserver å tcpclientçè¿ç¨
procedure TForm1.TcpServer1Accept(Sender: TObject;
éé¢ä¹æ¯æ»å¾ªç¯æ¥å¤çæ¶æ¯ãç´å°ä½ ç»æ¢ã
while ClientSocket.connected do
tcpclient1 ä¹æ¯ç±»ä¼¼çï¼ç¨åç¬ç线ç¨æ»å¾ªç¯æ¥å¤çæ¥æ¶çæ¶æ¯ã åªæåéæ¶æ¯å°±æ æè°
å¦ä½ç¨ DELPHI è·å CPU çåºåå·
示ä¾ä»£ç å¦ä¸ï¼procedure TForm1.Button1Click(Sender: TObject);type
TCPUID = array[1..4] of longint;
function GetCPUID: TCPUID;
asm
PUSH EBX
ãPUSH EDI
ãMOV EDI,EAX
ãMOV EAX,1
ãDW $AF
ãSTOSD
ãMOV EAX,EBX
ãSTOSD
ãMOV EAX,ECX
ãSTOSD
ãMOV EAX,EDX
ãSTOSD
ãPOP EDI
ãPOP EBX
end;
var
aCpuId: TCpuID;
begin
aCpuId := GetCPUID;
ShowMessage('CPU åºåå·æ¯: ' + IntToHex(aCpuId[4],8) + IntToHex(aCpuId[1],8));
end;
代ç è¿è¡æªå¾ï¼
ä¸å®é ç对æ¯ï¼
2024-12-26 01:16
2024-12-26 00:54
2024-12-26 00:50
2024-12-26 00:45
2024-12-26 00:36
2024-12-26 00:20
2024-12-25 23:25
2024-12-25 23:10