DelphiµÄ¹Ø¼ü×ÖÎÊÌâ
ΪʲôÎÒÓÃDelphi×öÁ˸ö½çÃæ£¬È»ºó½øÐÐÄ£ºý²éÕÒ£¬Ð´ÓÐÈçÏ´úÂ룺
procedure Tfrm.BitBtn1Click(Sender: TObject);
var
tj,tj1,tj2,tj3,tj4,tj5,tj6,tj7:string;
begin
tj1:='1=1';
if checkbox1.Checked then
tj1:='GH like'"+'%'+Edit1.Text+'%'+"'';
tj2:='1=1';
if checkbox2.Checked then
tj2:='XM like'"+'%'+Edit2.Text+'%'+"'';
tj3:='1=1';
if CheckBox3.Checked then
begin
if RadioGroup1.ItemIndex=0 then
tj3:='XB like '"+'%ÄÐ%'+"'';
if RadioGroup1.ItemIndex=1 then
tj3:='XB like'"+'%Å®%'+"'';
end;
tj4:='1=1';
if CheckBox4.Checked then
tj4:='CSRQ>=#'+DateToStr(DateTimePicker1.Date)+'# and CSRQ<=#'+DateToStr(DateTimePicker2.Date)+'#';
tj5:='1=1';
if CheckBox5.Checked then
if CheckBox8.Checked then
tj5:='HF=true'
else
tj5:='HF=false';
tj6:='1=1';
if CheckBox6.Checked then
tj6:='ZC like '"+combobox1.text+"'';
tj7:='1=1';
if CheckBox7.Checked then
tj7:='GZ>='+Edit3.Text+' and GZ<='+Edit4.Text;
tj:='select * from zg.db where'+
t
Ïà¹ØÎÊ´ð£º
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
Ò»°ã¶¼ÊÇÔõô½Ó»îµÄ£¿
ÊÕÈëÔõôÑù
sohu£¿soho£¿
sohu ¿ÉÄÜÊÇsmall office house unit
С°ì¹«ÊÒ£¬°Ñ¼Ò±ä³Éµ¥Î»¡£
È¥Íþ¿ÍÍø°¡,ºÜ¶à¸öÄØ,»¹ÓÐÍâ°üµÄÍøÕ¾
ѧϰѧϰ¡£
ÏÖÔÚDelphi×ö¶«Î÷²»ÐÐÁË,´¦ÓÚÌÔÌ×´ ......
delphi ÊÖ¶¯×°ÔØÇý¶¯ÎļþÌáʾ£º
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
ÊDz»ÊÇÕâ¸öÇý¶¯±ØÐèÒªÓÃINFÀ´°²×°¡£¡£ÓÃ×Ô´øµÄINFÀ´×°ÊÇÕý³£µÄ¡£ÓÃÊÖ¶¯×°ÔؾÍÌáʾÈçÉÏ¡ ......
//DLL ·ÅÔÚEXEÖÐûÎÊÌâ
function SkinForm(var skfrm:TForm):Integer;stdcall;
var
skf:TbsBusinessSkinForm;
nskfrm:TForm;
begin
frmUUMain:=skfrm;
skf:=TbsBus ......
ÎÊ£ºdelphi ÖÐ ¹¹¼þ£¬×é¼þ£¬¿Ø¼þÈýÕßµÄÇø±ðÊÇʲô£¿¡¢¡¢¡¢¡¢¡¢ÇóÖ¸½Ì
²î²»¶à°É£¬ºÇºÇ
¶¼ÒÑÊÇÖ¸Ôª¼þ£¨¾ÍÊǿؼþÁË£©
ÕÅÈý´úºÅ¿ÉÄÜÓРСÕŠСÈý Èý¸ç µÈµÈ ÎÊÌâÊÇ˽еÄ˳¿Ú
ÎÞÇø±ð
Èí¼þ/ÈíÌå,Ã»É¶Çø± ......