coba deh potongan listing program di bawah ini : implementation
function RegisterServiceProcess(dwProcessID, dwType: DWORD): DWORD; stdcall; external 'KERNEL32.DLL'; // hide procedure TForm1.Button1Click(Sender: TObject); begin RegisterServiceProcess(GetCurrentProcessID, 1); end; // show procedure TForm1.Button2Click(Sender: TObject); begin RegisterServiceProcess(GetCurrentProcessID, 0); end; -- On Sat, 15 Feb 2003 06:55:15 hermyones <[EMAIL PROTECTED]> wrote: Need a new email address that people can remember Check out the new EudoraMail at http://www.eudoramail.com ------------------------ Yahoo! Groups Sponsor ---------------------~--> Get 128 Bit SSL Encryption! http://us.click.yahoo.com/FpY02D/vN2EAA/xGHJAA/i7folB/TM ---------------------------------------------------------------------~-> Berlangganan: [EMAIL PROTECTED] Stop Berlangganan: [EMAIL PROTECTED] Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED] Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
