erro na biblioteca rtl

Muitos componentes, ao serem instalados no delphi, ocasionam um erro durante a compilação, devido à ausência do da biblioteca rtl. Esse problema pode ser resolvido adicionando as cláusulas “$(BDS)\lib” e “$(BDSCOMMONDIR)\dcp” no Library Path.

O ReportBuilder tem uma função muito interessante para "quebrar páginas" de modo que num relatório que tenha ligação mestre-detalhe, não tenha os registros-detalhe separados na quebra de página (ele quebra a página somente quando imprime o último registro detalhe ligado a um campo mestre.

Esta opção fica no Menu Report - Groups.

No seu relatório aberto no modo design, onde provavelmente você terá DBText com os dados-mestre e um subreport com os dados detalhe, acesse o caminho acima e na janela que se abre, insira o campo mestre (código de uma venda por exemplo) e pronto.

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;