8 dicas para Delphi:
1. Como chamar um arquivo exe externo no Delphi?
usaWinProcs;
.
começar
WinExec(......);
.
fim.
Não é diferente de chamar funções da biblioteca Pascal.
2. Como alterar a fonte e a cor da dica Delphi
As propriedades do TApplication no Delphi incluem HintColor e HintPause.
Você pode alterar a cor do Hint no aplicativo definindo HintColor e definindo HintPause
Altere o horário em que a dica é acionada.
Mas infelizmente: a fonte do Hint não pode ser alterada no Delphi.
3. Como calcular data em Delphi
Calcular o tempo é mais fácil no Delphi, da seguinte forma:
var ss: TDateTime
Na verdade, Tdatetime é um número de ponto flutuante de precisão dupla e seu ponto decimal representa o número de dias:
Por exemplo, ss := ss + 20 significa 20 dias a partir de ss, se ss = 234,567
Isso significa 234.567 dias, começando em 0 DC, é claro!
4. Como programar ScreenSaver usando Delphi (nulo)
O protetor de tela nada mais é do que um programa executável cuja extensão foi alterada para .SCR. Ele aceita dois parâmetros de linha de comando:
-s executa parâmetros de comando
-c configurar parâmetros de comando
O Windows inicia um programa enviando o parâmetro de linha de comando -s para o programa.
Deve-se observar que: a janela do programa não possui bordas e nem título; o tamanho da janela deve ser igual ao tamanho da tela;
Tratamento de eventos de janela.
5. Como alterar o nome de um diretório no Delphi
Chame a função RenameFile, como:
RenameFile('c:/wang/temp', 'c:/wang/tmp');
6. DELPHI exibe arquivos de imagem JPEG
Basta adicionar JPEG aos usos
Existe uma classe TJPEGImage na unidade JPEG, que pode definir uma variável como Jpeg e chamá-la com LoadFromFile.
Importe um arquivo JPEG e use Canvas.Draw(x,y,Jpeg) do Form para exibi-lo.
7. Processamento de arquivos no formato Jpeg em Delphi...
(1). Adicione unidade JPEG aos Usos;
(2). Defina uma variável global, como var AJPEG: TJPEGImage;
(3). Adicione: no evento OnCreate do Formulário:
Canvas.Pen.Color:=clPreto;
Canvas.Pen.Style:=psSolid;
Canvas.Brush.color:=clBtnFace;
Canvas.Brush.Style:=bsSolid; //Isso é para definir algumas propriedades do Canvas para conveniência futura.
//Limpa o formulário e carrega um novo arquivo JPEG;
AJpeg:=TJpegImage.Create;//Gerar AJpeg dinamicamente;
AJpeg.LoadFromFile('D:/Temp.jpg') //Após gerar o AJpeg, carrega o arquivo JPEG;
(4).Adicionar no evento OnPain do Formulário
Canvas.Rectangle(2,2,560,430); //Desenhe um retângulo preto para circundar a imagem;
x:=10;
Form1.Canvas.Draw(x,y,AJpeg); //Sai o arquivo JPEG com (x,y) no canto superior esquerdo;
//Na verdade, sua função é restaurar os gráficos quando os gráficos são destruídos;
(5). Adicione o seguinte ao evento OnClick do botão 'Carregar' ou 'Navegar':
começar
se OpenPictureDialog1.Execute então
começar
AJpeg.Free; //Libera o antigo AJpeg;
AJpeg:=TJpegImage.Create; //Gerar um novo AJpeg;
AJpeg.LoadFromFile(OpenPictureDialog1.Filename); //Carregar arquivo JPEG;
fim;
Canvas.Rectangle(2,2,560,430); //Limpar Formulário;
x:=10;
y:=10;
Form1.Canvas.Draw(x,y,AJpeg); //Exibir novo AJpeg;
fim;
8. Tela inicial do DELPHI3