administrador base de datos
Publicado por julio ramos (2 intervenciones) el 09/08/2005 21:21:04
quiero hacer que me cambien los caption de algunos botones dependiendo el caption que tenga
if f2.Caption = 'f2' then
f2.Caption := 'Cobrar';
f3.Caption := 'Anular';
f4.Caption := 'Imprimir';
f5.Caption := 'Desembolso';
f6.Caption := '';
f10.Caption := 'Logout';
else
f2.Caption := 'Cobrar1';
f3.Caption := 'Anular1';
f4.Caption := 'Imprimir1';
f5.Caption := 'Desembolso1';
f6.Caption := '1';
f10.Caption := 'Logout1';
end;
al final me da un error que me dice
[Error] Cobros.pas(62): ';' not allowed before 'ELSE'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Cobros.pas'
if f2.Caption = 'f2' then
f2.Caption := 'Cobrar';
f3.Caption := 'Anular';
f4.Caption := 'Imprimir';
f5.Caption := 'Desembolso';
f6.Caption := '';
f10.Caption := 'Logout';
else
f2.Caption := 'Cobrar1';
f3.Caption := 'Anular1';
f4.Caption := 'Imprimir1';
f5.Caption := 'Desembolso1';
f6.Caption := '1';
f10.Caption := 'Logout1';
end;
al final me da un error que me dice
[Error] Cobros.pas(62): ';' not allowed before 'ELSE'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Cobros.pas'
Valora esta pregunta


0