Alte Komponente TGlobe XE fähig machen

[Spectre]

hi!

hab mir ne version von TGlobe runtergeladen (einem 3D globus den man frei rotieren kann). dieser hat noch ein paar alte sourcecodes von alten delphiversionen intus leider. versuche das grad zum laufen zu kriegen.

hab im sourcecode sämtliche

Code:

WinProcs, WinTypes

in der USES durch "windows" ersetzt. (meines wissens nach sind die steinalt).

nun hab ich das problem bei folgender function:

Code:

class function TGlobe4.InstanceCount(iChange : Integer) : Integer;
const
  iInstanceCount : Integer = 0;
begin
 [B] iInstanceCount := iInstanceCount + iChange;[/B]
  Result := iInstanceCount;
end;

meldung:

Code:

[DCC Warnung] TGClasses.pas(6377): W1057 Implizite String-Umwandlung von 'ShortString' zu 'string'

sowie:

Code:

procedure TGlobeObjectSource.WriteMetaData(Writer : TGlobeStreamWriter);
var
  idx : integer;
begin
  giFileVersion := TG_METADATA_VERSION;

  Writer.WriteInteger(Presenters.Count);
  for idx := 0 to Presenters.Count - 1 do
  begin
[B] Writer.WriteShortString( Presenters[idx].ClassName );[/B]
    Presenters[idx].WriteProperties( Writer );
  end;

meldung:

Code:

[DCC Warnung] TGClasses.pas(6632): W1058 Implizite String-Umwandlung mit potenziellem Datenverlust von 'string' zu 'ShortString'

ich kann damit nichts anfangen da meine delphi kenntnisse nicht ausreichen, google wollte nicht wirklich helfen. sind das ebenfalls alte befehle die ich einfach auswchseln kann damit sie dunktionieren oder kann ich den globus in delphi XE vergessen? kann bei bedarf gerne die componente rausrücken(wenn ihr mir helfen möchtet).

Bin neugierig auf diesen 3d globus, möchte den für mein Geografie-lerntool benutzen wenn er hält was er verspricht, nur ist die komponente steinalt und wird nicht weiterentwickelt.

danke!

Robin

[zeras]

Das sind Warnungen durch Unicode. Es kann trotzdem funktionieren. Besser ist aber, alle Funktionen nun auf "String" anzupassen und nicht "Shortstring" zu nutzen.

[hoika]

Hallo,

und auch ein string[20] ist ein ShortString.


Heiko

[Spectre]

das programm startet aber nicht..die warnung wird gemeldet nach dem compilieren aber starten tut es nicht..

also darf ich gefahrlos alle shortstrings in Strings ändern?