>>1.我做了一个简单的C/S程序,用的是TSocketConnection连接,注意服务段要开Borland
Socket Server程序,在BIN目录下。例子发到你的油箱里拉,查收。
>>2.我这是CBC的代码,绝对正确,ShellExecute(Handle,NULL,Label1->Caption.c_str(),NULL,NULL,SW_SHOWNORMAL);
>>3.http->Get("http://192.168.0.129/login.php","?name=tab&password=123");
Post我也没成功。
>>4.Perform——Responds as if the control received a specified Windows message.
例子:
// Perform search on active DBRichEdit
TDBRichEdit *DBRE = DtsDBRE;
if (MainPgCtl->ActivePage->Caption == "Code Examples")
DBRE = CodeTBRE;
if (MainPgCtl->ActivePage->Caption == "TI's")
DBRE = TIDetDBRE;
if (MainPgCtl->ActivePage->Caption == "BC5 Bugs")
DBRE = BC5DBRE;
if (MainPgCtl->ActivePage->Caption == "Q and A's")
DBRE = DBQaRE;
if (MainPgCtl->ActivePage->Caption == "TN's")
DBRE = TNRE;
PosFound = DBRE->Perform(EM_FINDTEXT, FT_WHOLEWORD, (LPARAM) (&MyTFindText));
FoundOne = PosFound != -1;
DBRE->Perform(EM_SETSEL, PosFound, PosFound + Search.Length());
DBRE->Perform(EM_SCROLLCARET, 0, 0);
DBRE->SetFocus();