Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Integer -> Olevariant


webmaker - So 19.10.03 19:06
Titel: Integer -> Olevariant
Hi Leute,
wie kann ich einen Integer in einen Olevariant konvertieren?


AndyB - So 19.10.03 21:39


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
var
  MyVar: Variant;
  MyInt: Integer;
begin
  MyInt := 10;
  MyVar := MyInt;
end;


webmaker - Mo 20.10.03 10:35

Wenn ich das so mache und es direkt in die Funktion, in der ein OleVAriant gebraucht wird, einsetze meckert Delphi rum
:arrow: Falscher Typ


smiegel - Mo 20.10.03 16:25

Hallo,

normalerweise sollte das Beispiel von AndyB funktionieren.

Du kannst aber noch folgendes probieren:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
procedure TForm1.Button1Click(Sender: TObject);
var x:Integer;
    o:OleVariant;
begin
  x:=125;
  VarCast(o, x, varInteger);
  Label1.Caption:=VarToStr(o);
end;


webmaker - Mo 20.10.03 20:13

Supi Danke!