Valeu pessoal...
Descobri aqui como fazer.
Abraços
- Original Message -
From: "Cido" <[EMAIL PROTECTED]>
To:
Sent: Friday, January 18, 2008 9:27 AM
Subject: [delphi-br] Rave Reports
> Bom dia!
>
> Criei um formulário onde imprimo um cabeçalho, e, em
Bom dia!
Criei um formulário onde imprimo um cabeçalho, e, em um determinado espaço,
imprimo o resultado de uma query. Neste formulário tenho espaço para apenas
5 resultados dessa query.
Pergunto: caso a query me retorne 13 resultados, como faço para criar novos
formulários, imprimindo apenas 5
Boa tarde.
Tenho um formulário que criei em PDF.
Gostaria de preencher este formulário a partir da digitação, pelo usuário,
de alguns dados, em um sistema que criei.
Isso é possível?
Agradeço
Aparecido
minhas
necessidades)
Cido
procedure TForm1.BitBtn1Click(Sender: TObject);
var cont : integer;
begin
if Edit1.Text = '' then
begin
ShowMessage('Preencha o campo NÚMERO');
Edit1.SetFocus;
end
else if MaskEdit5.Text = ' / /' then
begin
aneira pois ele não reconhece
> ASDATETIME
>
>
> Cido escreveu:
>>
>> Tente passar a data como parâmetro:
>>
>> if radiobutton1.Checked then
>> if DateTimePicker1.Checked then
>> begin
>> adoconmovimento.Active := false;
>> adoconmovimento.S
Tente passar a data como parâmetro:
if radiobutton1.Checked then
if DateTimePicker1.Checked then
begin
adoconmovimento.Active := false;
adoconmovimento.SQL.Clear;
adoconmovimento.SQL.Add ('select * from movimento
a,categoria b,mat
Boa tarde.
Tenho uma base de dados onde tenho palavras acentuadas e não acentuadas e
quando vou realizar uma consulta, tenho que digitar a palavra com acento e
sem acento, para obter todos os registros.
Será que alguem tem uma idéia de como implementar uma busca que quando eu
digitasse uma palav
Esse seu arquivo texto não tem uma formatação padrão?
Eu dei um TAB em um arquivo texto e este TAB foi o espaço de 9 caracteres.
Eu acredito que você possa começar a copiar a partir do 9º caracter.
O que vc acha?
procedure TForm1.Button1Click(Sender: TObject);
var
TStr : TStringList;
a :
Olá...
Acredito que a imagem não seja anexada à mensagem. Não sei se é isso.
Eu costumo usar o seguinte:
Uso o endereço de uma imagem que está disponível no meu servidor WEB. Ai
funciona.
Memo1.Lines.Add('http://www.site.com.br/imagem.jpg";
border=0>');
NMSMTP1.PostMessage.Body.Text := Memo1.Te
Boa tarde!
Tenho um relatório, usando Quick Report e gostaria de exibir o resultado de
duas querys.
Em uma QRBand exibir todos os resultados da primeira query, e numa segunda
QRBand exibir os resultados da outra Query.
Isso é possível?
Grato
Aparecido
--
< FAVOR REMOVER ESTA PARTE AO
bType:= mtHTML;
NMSMTP1.PostMessage.Body.Text := Memo1.Text;
NMSMTP1.PostMessage.Subject := 'Informe CC n. ' + Edit1.Text + ' de ' +
Edit2.Text + ' a ' + MaskEdit5.Text;
NMSMTP1.SendMail;
NMSMTP1.Disconnect;
Cido
- Original Message -
From: "Allan"
11 matches
Mail list logo