Fórum Como fechar o aplicatiovo... #219809

11/03/2004

0

Delphi

como fechar o aplicativo mas fazer com que ele permaneça rodando até desligar a maquina???????????


Zumbi

Zumbi

Responder

Posts

11/03/2004

Kyonak

Form1.hide;


simples


Responder

Gostei + 0

11/03/2004

Kyonak

só completando
no evento OnCloseQuery do seu form vc coloca


canclose := false;
form1.hide;

morreu...


Responder

Gostei + 0

11/03/2004

Zumbi

desculpe minha ignorancia... mas quando eu dou um hide seria a mesma coisa que eu fosse dar um visible := false
e caso eu quereria chamar o aplicativo de novo... como eu faço?


Responder

Gostei + 0

11/03/2004

Kyonak

ou vc coloca um timer pra ele aparecer depois ou entaum vc tem que ter um procedimeno que capture as teclas do teclado ou cliques do mouse em qualquer parte do windows e quando voce apertar uma certa sequencia de teclas ele tira a aplicação do hide
mas essa parada eh mei complicada e eu nao tenho nenhum exemplo aki para te mostrar.

afinal, qual o interesse de fazer uma aplicação se esconder???


Responder

Gostei + 0

11/03/2004

Cabelo

Uma outra alternativa seria vc criar um ícone que ficasse ativo na barra do menu Iniciar..

Quando vc quisesse retornar o seu aplicativo, daria para clicar com o botão direito e chamar o programa novamente..

sem mais

Cabelo.


Responder

Gostei + 0

11/03/2004

Kyonak

Uma outra alternativa seria vc criar um ícone que ficasse ativo na barra do menu Iniciar.. Quando vc quisesse retornar o seu aplicativo, daria para clicar com o botão direito e chamar o programa novamente.. sem mais Cabelo.

só ajudando o cara o nome desse icone eh trayicon, existem centenas de componentes que fazem isso
caso seja seu interesse.


Responder

Gostei + 0

11/03/2004

Cabelo

Valeu pela dica..

realmente não sabia o nome deste ícone..
rs

mas já usei isso, e fiz via delphi..rs

mesmo assim muito obrigado..

Cabelo..


Responder

Gostei + 0

11/03/2004

Zumbi

eu nao gostaria de usar compontes de terceiros eu gostaria de fazer isso.. se alguem poder ajudar..


Responder

Gostei + 0

11/03/2004

Fabio.hc

Tente assim:

[b:9011d627d1]Icone na Barra de Tarefas[/b:9011d627d1]
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs ,ShellAPI, Menus;
 
const
  wm_IconMessage = wm_User;
 
type
  TForm1 = class(TForm)
  PopupMenu1: TPopupMenu;
  Lloyd1: TMenuItem;
  close1: TMenuItem;
  procedure FormCreate(Sender: TObject);
  procedure close1Click(Sender: TObject);
  procedure FormDestroy(Sender: TObject);
  procedure Lloyd1Click(Sender: TObject);
 
  private
  procedure IconTray (var Msg: TMessage);
  message wm_IconMessage;
  { Private declarations }
  public
  { Public declarations }
  nid: TNotifyIconData;
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.DFM}
 

procedure TForm1.FormCreate(Sender: TObject);
begin
  // carrega o ícone inicial
  Icon.Handle := LoadIcon (HInstance, ´MAINICON´);
  // preenche os dados da estrutura NotifyIcon
  nid.cbSize := sizeof (nid);
  nid.wnd := Handle;
  nid.uID := 1; // Identificador do ícone
  nid.uCallBAckMessage := wm_IconMessage;
  nid.hIcon := Icon.Handle;
  nid.szTip := ´LloydSoft´;
  nid.uFlags := nif_Message or
  nif_Icon or nif_Tip;
  Shell_NotifyIcon (NIM_ADD, @nid);
end;
 
procedure TForm1.IconTray (var Msg: TMessage);
var
  Pt: TPoint;
begin
  if Msg.lParam = wm_rbuttondown then
  begin
  GetCursorPos (Pt);
// SetForegroundWindow (Handle);
  PopupMenu1.Popup (Pt.x, Pt.y);
  end;
end;
 
procedure TForm1.close1Click(Sender: TObject);
begin
form1.close;
end;
 
procedure TForm1.FormDestroy(Sender: TObject);
begin
  nid.uFlags := 0;
  Shell_NotifyIcon (NIM_DELETE, @nid);
end;
 
procedure TForm1.Lloyd1Click(Sender: TObject);
begin
Showmessage(´LloydSoft é D+´); {Menu Popup}
end;
end.



Responder

Gostei + 0

21/03/2005

Marco Salles

Qual o metodo Oposto De Formulario.Hide ????


Gostaria de saber qual o Método Oposto Da Procedure Hide Do Formulário
:?: :?: :?:

Gostaria tb De Saber o Melhor Evento Do Formulário Sugerido Para se Alocar este Método :?: :?: :?: :?:

Obrigado


Responder

Gostei + 0

21/03/2005

Marco Salles

Qual o metodo Oposto De Formulario.Hide ???? Gostaria de saber qual o Método Oposto Da Procedure Hide Do Formulário Gostaria tb De Saber o Melhor Evento Do Formulário Sugerido Para se Alocar este Método Obrigado


Fiu abrir um tópico , acabei desenterrando este rssssss :lol: :lol: :lol: :lol:


Responder

Gostei + 0

21/03/2005

Gandalf.nho

[quote:94039f540b=´Marco Salles´]Qual o metodo Oposto De Formulario.Hide ????
[/quote:94039f540b]

Formulario.Show


Responder

Gostei + 0

21/03/2005

Marco Salles

Gostaria tb De Saber o Melhor Evento Do Formulário Sugerido Para se Alocar este Método


E o melhor evento para se escrever isot :?: :?: :?: :?: :?:


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar