Hola compañeros
Tengo una duda respecto de los Form Modal.
Si creo un form de la siguiente forma
Código Delphi
[-]
Form := TFormCreate(nil);
try
Form.ShowModal;
finally Form.Free;
end;
Luego en el evento ONCLOSE del Form ¿no debo poner Action := caFree; ? no?.
Porque lo hace en el finally?
Consulto porque siempre tenia el action en el OnClose y el Finally y no tenía problemas.
Pero ahora me sale problema de Operacion de Puntero invalido, cuando intento usar If para saber el MODAL RESULT.
Código Delphi
[-]
Form := TFormCreate(nil);
try
if Form.ShowModal = mrok
then showmessage('ok');
finally Form.Free;
end;
El error es porque estoy haciendo FREE dos veces, una en el ON CLOSE del Form y otra en el finally.
Cual sería el lugar indicado para el FREE ¿ en el finally del Try? o en el ONCLOSE del Form?