terça-feira, 27 de fevereiro de 2007
Borland cria ambiente gráfico para PHP
Qual a melhor distribuição de Linux?
Qual seria a melhor distribuição a ser utilizada?
Bem eu já utilizei várias como: Conectiva, Slackware, Kurumin, Debian e atualmente utilizo o Ubuntu que é uma variação do Debian. Mas se você ainda não optou por nenhuma, dê uma lida nesse artigo do site www.br-linux.org.
Clique aqui para ler o artigo.
Bem eu já utilizei várias como: Conectiva, Slackware, Kurumin, Debian e atualmente utilizo o Ubuntu que é uma variação do Debian. Mas se você ainda não optou por nenhuma, dê uma lida nesse artigo do site www.br-linux.org.
Clique aqui para ler o artigo.
Definição de Software Livre
Para quem está começando a utilizar o software livre, recomendo que leia está matéria muito interessante do site www.br-linux.org:
Clique aqui para ler a matéria.
Clique aqui para ler a matéria.
segunda-feira, 26 de fevereiro de 2007
Rotina para checar se um software está aberto!
Program Project1;
uses
Forms,
Windows, //não esqueça de declarar esta uses
Unit1 in 'Unit1.pas' {Form1};
{$R *.RES}
// Declare a variavel
var
Hwnd : THandle;
begin
// FindWindow vai procurar pela classe TApplication
// que tenha o nome do Title que vc configurou
Hwnd := FindWindow('TApplication', 'Teste'); //lembrando que Teste é o titulo da sua aplicação
// se o Handle e' 0 significa que nao encontrou
if Hwnd = 0 then
begin
Application.Initialize;
// Esta linha e' colocada automaticamente pelo Delphi
// ao se configurar o Title
Application.Title := 'Teste';
Application.CreateForm(TForm1, Form1);
Application.Run;
end
else
// Esta funcao traz para frente (da o foco) para a janela
// da aplicacao que ja esta rodando
SetForegroundWindow(Hwnd);
end.
uses
Forms,
Windows, //não esqueça de declarar esta uses
Unit1 in 'Unit1.pas' {Form1};
{$R *.RES}
// Declare a variavel
var
Hwnd : THandle;
begin
// FindWindow vai procurar pela classe TApplication
// que tenha o nome do Title que vc configurou
Hwnd := FindWindow('TApplication', 'Teste'); //lembrando que Teste é o titulo da sua aplicação
// se o Handle e' 0 significa que nao encontrou
if Hwnd = 0 then
begin
Application.Initialize;
// Esta linha e' colocada automaticamente pelo Delphi
// ao se configurar o Title
Application.Title := 'Teste';
Application.CreateForm(TForm1, Form1);
Application.Run;
end
else
// Esta funcao traz para frente (da o foco) para a janela
// da aplicacao que ja esta rodando
SetForegroundWindow(Hwnd);
end.
Assinar:
Postagens (Atom)