comando para bloquear caracteres especiais durante a digitação

if not (Key in ['A'..'Z','a'..'z','0'..'9',' ',#8]) then abort;

OBS : o símbolo ' #8 ' faz referência à tecla backspace. Nesse caso ele libera a digitação do "BACKSPACE" .

ordenar pesquisa por ano, mês ou dia

Utilizando o comendo extract e filtrando o campo 'nacimento' (data) através dos atributos 'year', 'month' e 'day'

Exemplo:

select * from clientes
order by extract (year from nascimento), extract (month from nascimento), extract (day from nascimento)

Obs: no exemplo acima o comando ordena a pesquisa na seguinte ordem : ano , mês e dia (no campo 'nascimento').

OBRIGAR DIGITAÇÃO COM LETRAS MAIÚSCULAS

Quando estiver utilizando Edit ou DbEdit e quiser obrigar que a entrada de dados seja em letras maiúsculas vá até a propriedade CharCase e selecione a opção 'ecUpperCase'.

tela maximizada ao imprimir com reportbuilder

Na propriedade "PreviewFormSettings" do componente "ppReport" , deixe os campos com os seguintes valores :

WindowState : wsMaximized
ZoomPercentage : 150
ZoomSetting : zsPercentage

Zoom to Fit no Quick Report

declare a cláusula QRPrntr no uses


antes de dar preview no QuickRep :

QuickRep1.PrevInitialZoom := qrZoomOther;
QuickRep1.PreviewInitialState := wsMaximized;

posicionar o cursor no final do texto de um edit

  
Edit1.SelStart := Length( Edit1.Text );

filtrando registros pelo mês de um campo tipo data

você pode filtrar registros por um determinado mês de um campo do tipo data , fazendo um select do tipo :

select * from clientes
where extract (month from 'nascimento') = 10

obs : nesse caso vai filtrar todos os clientes que nasceram em outubro ( filtra o mês 10 no campo nascimento)

se preferir pode passar o valor via parâmentro .