Delphi: violação de acesso no final do construtor Create ()
Eu tenho uma classe muito básica e simples como esta:
carregador de unidade;
interface
uses
Vcl.Dialogs;
type
TLoader = Class(TObject)
published
constructor Create();
end;
implementation
{ TLoader }
constructor TLoader.Create;
begin
ShowMessage('ok');
end;
end.
E do Form1 eu chamo assim:
procedure TForm1.Button1Click(Sender: TObject);
var
the : TLoader;
begin
the := the.Create;
end;
Agora, logo após othe := the.Create
parte, delphi mostra a mensagem com'ok'
e então me dá um erro e dizProject Project1.exe raised exception class $C0000005 with message 'access violation at 0x0040559d: read of address 0xffffffe4'.
Também mostra esta linha:
constructor TLoader.Create;
begin
ShowMessage('ok');
end; // <-------- THIS LINE IS MARKED AFTER THE ERROR.
Eu sou novo em delphi. Estou usando o Delphi XE2 e não consegui consertar esse erro. Alguém me mostra um caminho ou tem solução para isso?