delphi³ÌÐòÎÊÌâ edit1£«edit2=edit3
ÎÒÏëʵÏֵŦÄÜÊÇ£¬ÏÖÓÐÈý¸öEDIT¿Ø¼üedit1¡¢edit2¡¢edit3
edit3ÏÔʾµÄÖµÊÇedit1Óëedit2µÄ»ý£¬ÔÚ²»ÐèÒª°´¼üÇé¿öÏÂʵÏÖ
±ÈÈ磺ÔÚedit1ºÍedit2·Ö±ðÊäÈë1ºÍ2 ¹â±êµãµ½edit3µÄʱºò»á×Ô¶¯ÏÔʾ³öËûÃǺͻý
Ï£Íû¸ßÊÖÖ¸½Ì£¡×îºÃÏêϸһµã£¡
procedure TForm1.Edit3MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
edit3.Text :=inttostr(strToint(edit1.Text)*strToint(edit2.Text));
end;
°´ÉÏÃæÕâ¸öд½øÈ¥Ö®ºóµã»÷EDIT3³ÌÐò¾Í³ö´íÁË
Delphi(Pascal) code:
edit3.Text :=inttostr(strTointDef(edit1.Text,-1)*strTointDef(edit2.Text,-1));
Â¥ÉÏÕý½â
лл´ó¼Ò£¬ÒѾ½â¾öÁË£¡´úÂëûÓÐ´í£¬ÊÇÒòΪ֮ǰÁôÏÂÁËһЩÍüÁËɾ³ý¶ÔÓ¦µÄ¹ý³ÌÉùÃ÷µ¼Öµģ¡
ºÇºÇ~²äµã·ÖÀ´×Å
IntToStr()£¿ or FloatToStr()?
ÌáÐÑÏ£¬¿¼ÂÇ*Íêºó£¬Êý¾ÝÀàÐÍÎÊÌâ
Ï£Íû¸ßÊÖÖ¸½Ì£¡×îºÃÏêϸһµã£¡
procedure TForm1.Edit3MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
edit3.Text :=inttostr(strToint(edit1.Text)*strToint(edit2.Text));
end;
°´ÉÏÃæÕâ¸öд½øÈ¥Ö®ºóµã»÷EDIT3³ÌÐò¾Í³ö´íÁË
Ó¦¸ÃûÓдíÎó°¡
µ÷ÊÔÏÂ
Ïà¹ØÎÊ´ð£º
ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ
ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......
ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd()
¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book');
ʱÌáʾstradd䶨Òå...
Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤!
(ÔÚA ......
Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿
ÎÞÈ˻شð£¿
×ö³É×ÊÔ´Î ......
VC++ ÖУ¬ &±äÁ¿Ãû¡£ ÊÇʲôÒâ˼¡£ DelphiÖÐ ºÍËûÒ»ÑùµÄ·ûºÅ ÊÇÄĸö¡¢£¿
´ó¼Ò¶¼ÈÏΪ£¬CÓïÑÔÖ®ËùÒÔÇ¿´ó£¬ÒÔ¼°Æä×ÔÓÉÐÔ£¬ºÜ´ó²¿·ÖÌåÏÖÔÚÆäÁé»îµÄÖ¸ÕëÔËÓÃÉÏ¡£Òò´Ë£¬ËµÖ¸ÕëÊÇCÓïÑÔµÄÁé»ê£¬Ò»µã¶¼²»Îª¹ý¡£Í¬Ê±£¬ ......
delphi 6 µÄ¿ÉÖ´ÐгÌÐòÔÚVISTAϲ»ÄÜÖ´ÐУ¬Ò»Ö±ÔÚ½ø³ÌÖУ¬ÎÞ·¨Æô¶¯£¬ÇëÓмû¹ýÕâÖÖÇé¿öµÄÅóÓÑÖ¸µãһϣ¬ÈçºÎ´¦Àí
ÎÒÖ¸µÄÊÇdelphi±àÒëºÃµÄ¿ÉÖ´ÐгÌÐò£¬ÔÚVISTAÏÂÎÞ·¨Ö´ÐС£¿ÉÖ´ÐгÌÐòÊǺܶàÄêǰµÄÁË£¬¿Ï¶¨²»ÄÜÔÙ±àÒ ......