Código
Arquivo := 'Control';
Parametro := 'Printers';
ShellExecute(0, 'open', PChar(Arquivo), PChar(Parametro), nil, SW_ShowNormal);
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009