myclipboard free freeandnil formclose exception

[AlistairG]

Hi I am used to freeing self-created objects:
procedure Tmainform.FormClose(Sender: TObject; var CloseAction: TCloseAction);
begin
myclipboard.Free;
end;

I can step through this without an error but as the inherant destruction methods progress then I get a external sigsegv error.
Obviously dont need to free the object, just wondering why anyone know?
thanks vm.
Alistair.

[Laksen]

How do you create myclipboard?

[AlistairG]

How do you create myclipboard?

procedure Tmainform.FormCreate(Sender: TObject);
begin
myclipboard:=clipboard.Create;

I tried:
procedure Tmainform.exit1Click(Sender: TObject);
begin
myclipboard.Open;
myclipboard.close;
freeandnil(myclipboard);  //same error
mainform.close;
end;

same error.
so Ill leave it as myclipboard.close, which is a sort of tidy up.

[ik]

Code: [Select]

Try the following:

[code ]if Assigned(MyClipboard) then
  FreeAndNil(MyClipboard);

[AlistairG]

Code: [Select]

Try the following:

[code ]if Assigned(MyClipboard) then
  FreeAndNil(MyClipboard);

Still raises error. Without, no error.