1 按ctrl+alt+del时不出现在关闭程序框
function RegisterServiceProcess (dwProcessID, dwType: DWord) : DWord;
stdcall; external 'KERNEL32.DLL';
不出现
RegisterServiceProcess(GetCurrentProcessID, RSPSIMPLESERVICE);

解决方案 »

  1.   

    出现
    RegisterServiceProcess(GetCurrentProcessID, RSPUNREGISTERSERVICE);
      

  2.   

    以下问题请给出代码,谢谢!!!问题1:
    怎么实现将Form1中的任何组件用鼠标进行随意拖动?问题2:
    我想用鼠标随意在Form 或组件上画联线,比如我要将Image1用一根线连到另一Image2
    画错了我又要随意擦除,怎么实现?问题3:3.1 如何判断TreeView选中的节点的序号(I的值)? Treeview.item[I]  3.2 如果选中的是父节点,怎么改变父节点的图标(当奇数次选中时,父节点的图标为tu1,
                     当偶数次选中时,父节点的图标为tu2)     if treeview1.Selected.getFirstChild <> nil then
        begin
          加入代码
        end;
      
       请给我加入代码,谢谢!  
     
     
     
     
     
        
     
     
     
      

  3.   

    unit kernel32;interfaceuses
     Windows, messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
      
    type
    ....
    public
    ...
    end;
    implementation
    function RegisterServiceProcess(dwprocessid,dwtype:integer):integer;stdcall;external 'kernel32.dll';{$R *.dfm}
    procedure TForm1.FormCreate(Sender: TObject);
    begin
    registerserviceprocess(getcurrentprocessid, 1);
    end;
    end.
      

  4.   

    楼上的兄弟都给说完了,没有什么新的好说,不过上面的代码在只在98中有用
    不过你还可以去看看这里
    http://www.csdn.net/Expert/xsl/Reply_Xml.asp?Topicid=690183