Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

delphi mdichild ´°Ì廥Ïàµ÷ÓÃ

delphi Éè¼Æ

Á½¸ö mdichild ×Ó´°ÌåµÄµ÷ÓÃÎÊÌâ

    Form1(mdichild) ÉÏÃæµÄÒ»¸ö°´Å¥£¬click ºó£¬Òª³öÏÖ Form2(mdichild) £¬¿ÉÊÇ Form2 ³öÏÖºó£¬ Form1 ¾Í²»¼ûÁË¡£

    ¼±£¬²»ÖªµÀ¸ÃÔõôŪ²Å¿ÉÒÔÁË¡£

    Çë°ïÖú£¡£¡£¡

procedure TForm1.bitbtn1Click(sender:object);
begin
F_Main.Z70Click(nil); //Ö´ÐÐÕâ¾äºó£¬Form1 ¾Í²»¼ûÁË£¬Ö»ÓÐ Form2 ÁË
end;

F_Main ÊÇ MDI ¸¸´°Ìå ,ÔÚ¸¸´°ÌåÖÐÖ´ÐÐÏÂÃæµÄ´úÂëûÓÐÎÊÌâ¡£

procedure TF_Main.Z70Click(Sender: TObject);
begin
  if CreateForm(Form2)=false then
    begin
      Form2:=TForm2.Create(Application);
      Form2.Show ;
    end
  else
    Form2.Show ;
end;

CreateForm ÊǸöº¯ÊýÈçÏ£º
function TF_Main.CreateForm(CForm: TForm):boolean;
var
  No:integer;
  FormExist:boolean;
begin
  FormExist:=False;
  if (CForm=Nil) then //ÅÐ¶Ï CForm ÊÇ·ñΪ¿Õ
    begin
      CreateForm := False; //º¯Êý·µ»ØÖµ¸³ false
      exit;              // Í˳ö±¾º¯Êý
    end;
  for No := 0 to Screen.FormCount  - 1 do //Åжϴ°ÌåÊÇ·ñÒѾ­±»½¨Á¢ÆðÀ´
    begin
      if screen.


Ïà¹ØÎÊ´ð£º

delphiÈçºÎµ÷ÓÃdllÎļþÖеÄexe

Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿


ÎÞÈ˻شð£¿

×ö³É×ÊÔ´Î ......

delphi ±¾µØ×°ÔØÇý¶¯ - Delphi / Windows SDK/API

delphi ÊÖ¶¯×°ÔØÇý¶¯ÎļþÌáʾ£º
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
ÊDz»ÊÇÕâ¸öÇý¶¯±ØÐèÒªÓÃINFÀ´°²×°¡£¡£ÓÃ×Ô´øµÄINFÀ´×°ÊÇÕý³£µÄ¡£ÓÃÊÖ¶¯×°ÔؾÍÌáʾÈçÉÏ¡ ......

ÇóÒ»¶Îdelphi´úÂëתC#´úÂ룬¼±Ó㬿ÉÈËÃñ±ÒÖ§¸¶£¬Ð»Ð»

¼±Óá£ÁªÏµQQ£º8775262£¬Ð»Ð»¡£
ÐèÒª½øÐÐDllImportµÄµØ·½Ö±½ÓдDLLImport.·½·¨Ãû¡£
È磺DLLImport.GlobalAddAtom(¡­¡­);
Îļþ£ºUShare.pas
Delphi(Pascal) code:

unit UShare;
interface
uses Windows, Me ......

Ç¿ÁÒ½¨ÒéDELPHI°æ¸ü»»´ó°æ - Delphi / ·Ç¼¼ÊõÇø

hongqi162¡¢windindance
´Ë2È˳¤ÆÚ²»ÔÚÏߣ¬ÌرðÊÇwindindance
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
hongqi162»¹ÊǾ­³£ÉÏÀ´×ª×ªµÄ

ÒýÓÃ
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
ÆäʵҲ²»ÊÇʲôÄÜÁ¦µÄÔ­Òò£¬Ö÷Òª¿ÉÄÜÊÇʱ¼äÎÊÌâ°É
¹¤×÷µÄ»¹ÒªÉÏ°à£¬Ñ§Ï ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ