RoyalGao

要像一棵树栽在溪水旁,按时侯结果子,叶子也不枯干(诗篇)。
Mail: gaoquanning@163.com

导航

2013年11月20日 #

SelectDirectory()函数

摘要: #include void __fastcall TOthersSettingForm::btnSelectNewPathClick(TObject *Sender){ String Dir = edt1->Text; if (SelectDirectory(L"請選擇路徑", WideString(""),Dir)) { if (Dir.SubString(Dir.Length(),1) != '\\') Dir = Dir + "\\"; MainForm->FileInfo.asPath = Dir; 阅读全文

posted @ 2013-11-20 17:00 RoyalGao 阅读(239) 评论(0) 推荐(0) 编辑

Pos()函数

摘要: AnsiString s = UserLoginForm->edtUserName->Text; AnsiString sub = MainForm->EmployeeInfo.asKeyword; if(AnsiPos(sub, s)) { MessageBox(NULL," 1! ","1",MB_OK); }AnsiString sub = MainForm->EmployeeInfo.asKeyword; int pos = UserLoginForm->edtUserName->Text.Pos(sub);h 阅读全文

posted @ 2013-11-20 16:56 RoyalGao 阅读(1086) 评论(0) 推荐(0) 编辑