Ajude-me duvida CASE
[color=red:21c440b83c][b:21c440b83c]Prezados Delphianos[/b:21c440b83c][/color:21c440b83c]
Estou com uma duivida simples cara voces.
Estou tentando fazer uma opção que quando coloco um numero o label fique vermelho.
assim
[b:21c440b83c][color=green:21c440b83c]procedure
var
numero:real;
begin
case numero of
0..20:label1.text.color:=´clred´;
21..39:label2.text.color:=´clred´;
end;[/color:21c440b83c][/b:21c440b83c]esta certo assim
me judem por favor e se form porssivel me mando umas aulas case estou enrolado nessa claúsula.
Estou com uma duivida simples cara voces.
Estou tentando fazer uma opção que quando coloco um numero o label fique vermelho.
assim
[b:21c440b83c][color=green:21c440b83c]procedure
var
numero:real;
begin
case numero of
0..20:label1.text.color:=´clred´;
21..39:label2.text.color:=´clred´;
end;[/color:21c440b83c][/b:21c440b83c]esta certo assim
me judem por favor e se form porssivel me mando umas aulas case estou enrolado nessa claúsula.
Maxwel Eduardo
Curtidas 0
Respostas
Rjun
20/06/2005
procedure
var
numero: integer;
begin
case numero of
0..20: label1.text.color := clred;
21..39: label2.text.color := clred;
end;
end;
GOSTEI 0