Duvidas Sobre Shell Script Entre Outras

Delphi

05/06/2005

antes vou começar com duvidas simples q simplesmente nao me lembro
1º como faço pra executar a minha aplicação delphi em tela cheia , como se fosse uma proteçao de tela.
2º como faço pra habilitar uma scrollbar
e agora as q realmente eu nunca soube e to com dificuldade em descobrir
1º como capturo o fim da linha em um memo e posiciono o cursor
2º usando statusbar como faço pra ajustar o tamanho de cada panel
3ºqual a api q chama a janela de data
4º e como eu faço um comando pra adicionar em um arquivo texto algumas informaçoes q forneceria no comando usando | como separador.
ex:

comando info1|info2|info3

e no arquivo texto ficaria

info1 info2 info3

5º e alguem sabe como criar no delphi um menu como o menu iniciar do windows


Kenshinhimura

Kenshinhimura

Curtidas 0

Respostas

Sandra

Sandra

05/06/2005

Kenshin.


1º como faço pra executar a minha aplicação delphi em tela cheia , como se fosse uma proteçao de tela.
Testei no WinXP.
No Iniciar > Configurações > Barra de tarefas e menu iniciar, marque a opção ´Ocultar automaticamente a barra de tarefas´.

No Delphi:
Na propriedade WindowState do form, altere para [b:6c54991c5a]wsMaximized[/b:6c54991c5a].

No onCreate do form:
begin
  ShowWindow(FindWindow(´Shell_TrayWnd´, nil), SW_HIDE);
end;

onCloseQuery:
begin
  ShowWindow(FindWindow(´Shell_TrayWnd´, nil), SW_SHOWNORMAL);
end;

- - - x.x - - -
3ºqual a api q chama a janela de data
Você quer as propriedades da data e hora do Win?
procedure TForm1.Button1Click(Sender: TObject);
begin
  WinExec(´RunDLL32.exe Shell32.DLL,Control_RunDLL TimeDate.cpl´, SW_Show);
end;


Espero que ajude.


GOSTEI 0
Kenshinhimura

Kenshinhimura

05/06/2005

Obrigado sandra


GOSTEI 0
Massuda

Massuda

05/06/2005

2º como faço pra habilitar uma scrollbar
Será que você poderia explicar melhor?

1º como capturo o fim da linha em um memo e posiciono o cursor
Se eu entendi direito, você quer por o cursor no final do memo... para isso, faça algo assim:
Memo1.SelStart := Length(Memo1.Lines.Text);
Memo1.SelLength := 0;

2º usando statusbar como faço pra ajustar o tamanho de cada panel
Através da propriedade TStatusBar.Panels[] você pode acessar cada um dos painéis que formam a barra de status (TStatusBar.Panels.Count informa quantos painéis existem); use a propriedade TStatusPanel.Width de cada painel para ajustar a largura como você desejar.

4º e como eu faço um comando pra adicionar em um arquivo texto algumas informaçoes q forneceria no comando usando | como separador.
Se você estiver escrevendo no arquivo usando Write/WriteLn, depois de abrir o arquivo, vá até o final dele:
var
  F: file;
...
  AssignFile(F, ´UmNomeDeArquivo.Qualquer´);
  Reset(F); // abre sem perder o conteúdo
  Seek(F, FileSize(F)); // move para o fim
...
  CloseFile(F);
Um alternativa é usar um TStringList; use TStringList.LoadFromFile para ler o arquivo, adicione texto usando TStringList.Add e salve o arquivo usando TStringList.SaveToFile.

5º e alguem sabe como criar no delphi um menu como o menu iniciar do windows
Será que você poderia explicar melhor?


GOSTEI 0
Kenshinhimura

Kenshinhimura

05/06/2005

assim tudo q é digitado vai pra um memo so q depois de varios comando seria necessario uma escrollbar do lado do memo pra poder navegar entre as linguas

e quanto ao menu tipo o do windows
eu me refiro ao menu iniciar , gostaria de criar um menu semelhante ao menu iniciar.

e se vc souber um pouko de bd preciso de uma ajuda q ta dando uns erro , se puder me adiciona no msn pra gente conversar por la rurouni_jhonny@hotmail.com


GOSTEI 0
Massuda

Massuda

05/06/2005

assim tudo q é digitado vai pra um memo so q depois de varios comando seria necessario uma escrollbar do lado do memo...
Use a propriedade ScrollBars do memo.

...pra poder navegar entre as linguas
Não entendi.

e quanto ao menu tipo o do windows eu me refiro ao menu iniciar , gostaria de criar um menu semelhante ao menu iniciar.
Seria para usar dentro do seu programa ou para seu programa substituir o menu iniciar do Windows?

e se vc souber um pouko de bd preciso de uma ajuda q ta dando uns erro...
Use o fórum. Abra outro tópico e conte seus problemas.


GOSTEI 0
POSTAR