If, Else, Then - Comando simples para ReportBuilder.

Delphi

02/04/2018

Bom dia. Estou precisando fazer uma condição bem simples em um ReportBuilder do sistema, mas não conheço quase nada de Delphi. O cliente me pediu para que no relatório mostre o código das contas de seus cliente para fazer a integração com a contabilidade. Acontece que no relatório que estou confeccionando não possui essa variável. Então resolvi fazer a seguinte condição.

Se codigocliente = ''xxxxx'' então
imprima = ''yyyyyy''


Nos comandos Delphi estou fazendo assim, só que não está funcionando.

begin
 If  DBText2.FieldValue = ''001290'' Then
     Variable1.Visible  := ''001'';
end;


A variável "DBText2" imprime os códigos dos clientes, e a variável "Variable1" é que eu quero mostrar o código das contas. Pra isso eu terei que fazer várias condições informando o sistema qual código de conta é respectivo de cada cliente.

Desde já agradeço
Helbert Márcio

Helbert Márcio

Curtidas 0

Melhor post

Douglas Sousa

Douglas Sousa

02/04/2018

Boa tarde,

Por que não insere uma variavel e joga um select buscando o código da conta e usando como parâmetro o código do cliente?

mais ou menos assim:

  Value :=  ConsultaSQL(''select conta from tabela where cliente = '' + pipeRelatorio[''CODIGO''])
GOSTEI 3

Mais Respostas

Paulo Cotrim

Paulo Cotrim

02/04/2018

begin
If DBText2.FieldValue = ''001290'' Then
Variable1.Visible := ''001'';
end;

está errado

begin
If DBText2.text = '001290' Then
begin
Variable1.Visible := true;
Variable1.value := '001';
end;
end;
GOSTEI 1
POSTAR