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
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