[Duvida] if condição then

[~Juniior 0]

Para adicionar Else, é preciso colocar uma condição: 'if condição then'

 

Como adicionar uma condição neste caso:

procedure TForm1.RadioButton1Click(Sender: TObject);

begin

try

r := TResourceStream.Create(HInstance, 'ai', 'kom');

r.SaveToFile(edit1.text + '\stage\ai\ai.kom');

finally

r.Free;

end;

ShowMessage('Menssagem')

end;

[edoO~' 1]

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

quem disse que precisa de else?

[darkfenyx3 7]

Muda o finally para >>> except, caso ele não consiga fazer o try ou dê algum erro ele executa a exeção.

[- NOOB 2]

não é nescessário exatamente o if para usar o else.

mesmo assim tenta do jeito edoO

acho que dara certo.

Abraços!

[~Juniior 0]

mas ... no caso para colocar

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Tenho que fazer como com o if then?

[edoO~' 1]

if fileexists?

[darkfenyx3 7]

Você leu o que eu disse? acho que não... aqui está mastigado..

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Estude o código e o adapite para o que deseja.

[~Juniior 0]

darkfenyx3

 

 

OBRIGADO

OBRIGADO

 

AGRADEÇO SUA COLABORAÇÃO RESOLVIDO, SOLUCIONADO, LEVOU MEU +

[darkfenyx3 7]

como você quer fazer algo ter um else sendo que não é pra ter? ¬¬', faça como eu te falei... nem deve ter lido(pela 2° vez).

[DragonBoss 9]

Resolvido.

Fechado.