AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Olevariant Typ explizit zuweisen

Ein Thema von Rainer Wolff · begonnen am 19. Apr 2021 · letzter Beitrag vom 19. Apr 2021
Antwort Antwort
Rainer Wolff

Registriert seit: 25. Okt 2005
Ort: Bretten
280 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#1

Olevariant Typ explizit zuweisen

  Alt 19. Apr 2021, 12:32
Delphi-Version: 10.4 Sydney
Hallo,

ich bin heute an einer Variant-Zuweisung hängen geblieben, habe auch eine Lösung gefunden, wollte aber wissen, ob es auch richtiger geht.

Wenn ich folgendes mache:
Code:
procedure TForm15.FormCreate(Sender: TObject);
var
  v: variant;
  o: olevariant;
  dw: LongWord;
begin
  dw:=5;
  v:=dw;
  o:=dw;
  caption:=vartype(v).ToString+' o:'+vartype(o).ToString;
end;
dann erhalte ich als vartype von v die 19 (=varUInt32), für o jedoch die 3 (=varInteger), obwohl nachdem, was ich gegoogelt habe, auch die OleVariant UInt32 kennt.

Gelöst habe ich das, indem ich nach der Zuweisung direkt den gewünschten Typ in die Variantenstruktur schmiere:

TVarData(ItemValue).VType:=varUInt32;

Das hilft bei meinem Problem, aber ob es auch der Weisheit letzter Schluss ist, weiss ich nicht.
  Mit Zitat antworten Zitat
Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
3.834 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#2

AW: Olevariant Typ explizit zuweisen

  Alt 19. Apr 2021, 17:29
Is wohl ette hier: https://quality.embarcadero.com/browse/RSP-18363
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +2. Es ist jetzt 00:23 Uhr.
Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf