Ir para conteúdo
Fórum Script Brasil

kconsys

Membros
  • Total de itens

    3
  • Registro em

  • Última visita

Sobre kconsys

kconsys's Achievements

0

Reputação

  1. Paulo voce deu conta de resolver isto???? estou com o mesmo problema.
  2. isso é um bug, ou mehor, apenas esquecimento de quem desenvolveu o software de atualizar a barra de tarefas do windows isso não causa nenhum problema, somente esse inconveniente do icone não sumir se não passar o mouse sobre ele. abraço Mas no Caso não Teria como fazer algo tipo o Shell_NotifyIcon(NIM_DELETE, ???)
  3. Estou Utilizando o codigo abaixo para abrir e fechar o ultravnc porem quando fecho o mesmo não consigo retirar o icone da badeja do windows o mesmo sai quando passo o mouse em cima quem puder me ajudar. obrigado. procedure TForm1.Button1Click(Sender: TObject); begin FillChar(StartupInfo, SizeOf(StartupInfo), 0); FillChar(ProcessInformation, SizeOf(ProcessInformation), 0); StartupInfo.cb := SizeOf(StartupInfo); StartupInfo.dwFlags := STARTF_USESHOWWINDOW; StartupInfo.wShowWindow := SW_SHOWNORMAL; Button2.Enabled := CreateProcess(nil, // Nome do módulo executável 'C:\Program Files (x86)\UltraVNC\vncviewer.exe -listen 5505', // Linha de comando nil, // Atributos do processo (SECURITY_ATTRIBUTES) nil, // Atributos da thread (SECURITY_ATTRIBUTES) false, // Herdar handles do processo chamador CREATE_NEW_CONSOLE or // Flags de criação e NORMAL_PRIORITY_CLASS, // de prioridade nil, // Variáveis de ambientes para o processo nil, // Diretório corrente do processo StartupInfo, // Determina como a janela do processo deve aparecer ProcessInformation); // Informações sobre o processo criado Button1.Enabled := not Button2.Enabled; end; procedure TForm1.Button2Click(Sender: TObject); begin Button2.Enabled := False; Button1.Enabled := not Button2.Enabled; TerminateProcess(ProcessInformation.hProcess, 0); end;
×
×
  • Criar Novo...