Fórum Ajude-me duvida CASE #285291

20/06/2005

0

[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.


Maxwel Eduardo

Maxwel Eduardo

Responder

Posts

20/06/2005

Rjun

procedure 
var 
  numero: integer; 
begin 
  case numero of 
    0..20: label1.text.color := clred; 
    21..39: label2.text.color := clred; 
  end;
end;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar