Como obter o texto que o usuário digitou no Dialog
A caixa Inputbox serve para pedir que o usuário digite algo. A sua prima é a Passwordbox, que tem funcionamento idêntico, apenas não mostra na tela o que o usuário digita (útil para senhas).
Como reconhecer respostas SIM ou NÃO no Dialog
A forma mais básica de se comunicar com o usuário é fazendo perguntas que ele possa responder com Sim ou Não. É possível fazer um configurador, ou até mesmo um programinha simples com essas respostas. Já foi visto como fazer uma telinha desse tipo: Consulte mais informação
Entendendo os parâmetros obrigatórios da linha de comando no Dialog
No Dialog, é obrigatório passar o texto e o tamanho da caixa, sempre. Com isso, a cada chamada do programa, devem haver pelo menos 4 opções na linha de comando.
Adicionar o evento OnClick do DBGrid no Delphi
- Monte seu form normalmente, colocando o DBGrid e demais componentes; - Vá na seção "private" da unit e declare a procedure abaixo: Consulte mais informação
Configurar linhas de diferentes alturas em StringGrid no Delphi
- Coloque o StringGrid no form. - No evento OnCreate do form coloque o código abaixo: procedure TForm1.FormCreate(Sender: TObject); begin StringGrid1.RowHeights[0] := 15; StringGrid1.RowHeights[1] := 20; StringGrid1.RowHeights[2] := 50; StringGrid1.RowHeights[3] := 35; end;
Colocar uma ProgressBar na StatusBar no Delphi
- Coloque uma StatusBar no form. - Adicione dois paineis na StatusBar (propriedade Panels). - Ajuste as propriedades do primeiro painel conforme abaixo: Style = psOwnerDraw Width = 150 Consulte mais informação
Converter de Hexadecimal para Inteiro no Delphi
Inclua na seção uses: SysUtils
A função StrToInt pode receber uma string no formato de um número decimal ou hexadecimal. Então podemos usá-la assim: Consulte mais informação
Mostrar o diálogo About (Sobre) do Windows no Delphi
Inclua na seção uses: ShellApi
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellAbout(Handle, 'Sistema Financeiro', 'Marcelo Senger',
Application.Icon.Handle);
end;
Obter status da memória do sistema no Delphi
Inclua na seção uses: Windows, SysUtils
- Coloque um TMemo no form - Coloque um TButton no form e altere seu OnClick conforme abaixo: Consulte mais informação
Criar uma DLL de Bitmaps e usá-la no Delphi
- Crie um arquivo de recursos (.RES) contendo os Bitmaps. Use o Image Editor do Delphi para criar este arquivo. Salve-o com o nome BMPS.RES na pasta onde será salvo o projeto do Delphi; - Crie um novo projeto no Delphi; - Remova todos os forms do projeto; - Salve este projeto com o nome DLLBmp.dpr; - Abra o arquivo de projeto (DLLBmp.dpr) e altere para ficar somente com as linhas abaixo: Consulte mais informação
Implementar procedure Delay do Pascal no Delphi
procedure Delay(MSec: Cardinal);
var
Start: Cardinal;
begin
Start := GetTickCount;
repeat
Application.ProcessMessages;
until (GetTickCount - Start) >= MSec;
end;
Consulte mais informação
Personalizar a caixa de mensagem de exceções (erro) do Delphi
- Declare um método (procedure) na seção private do form principal conforme abaixo: private procedure ManipulaExcecoes(Sender: TObject; E: Exception); Consulte mais informação
Ocultar o aplicativo do CTRL+ALT+DEL – Outra Opção no Delphi
Inclua no implementation de seu programa a seguinte linha: function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external 'KERNEL32.DLL'; Consulte mais informação
Mostrar mensagem mesmo que esteja no Prompt do DOS no Delphi
Inclua na seção uses: Windows
Antes de mostrar a mensagem, coloque sua aplicação na frente das demais. Consulte mais informação