Syntax to dereference and assign a Pointer in Delphi

Question

Need to implement an interface method where a Pointer is passed and it is expected to dereference the Pointer and assign to it an OleVariant. Whats the syntax to do this?

// Code I have no access to change
function GetEntry: string;
var
  value: OleVariant;
begin
  Entry(@value);  
  Result := VarToStr(value);
end;

// My code  
procedure Entry(Value: Pointer);
begin
  Value^ := ??? // Not sure whats the syntax here in order to assign an OleVariant
end

David Heffernan · Accepted Answer · 2018-07-09 10:35:10Z

9

You can use a value cast like this:

OleVariant(Value^) := ...

Alternatively you can cast the pointer:

POleVariant(Value)^ := ...

answered Jul 9, 2018 at 10:35

David Heffernan

616k46 gold badges1.1k silver badges1.5k bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Syntax to dereference and assign a Pointer in Delphi

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related