Functions-Problem

Also, ich habe mir folgende Function gebaut:

Delphi-Quellcode:

			function GVersion(s: String): String;

begin

  while Pos('.', x) > 0 do

    x[Pos('.', s)] := ' ';

  while Pos(' ', x) > 0 do

    Delete(x, Pos(' ', x), 1);

    result := x;

end;

Damit mache ich aus z.B. 1.0.0.0 dann 1000.
So..

Insgesamt führe ich das zwei mal mit zwei verschiedenen Exe-Files aus.

markieren

Delphi-Quellcode:

			sAppVersion := GVersion(sAppVersion);

sAktVersion := GVersion(sAktVersion);

Das klappt aber nicht, beide Strings bleiben leer.

Ich habe zwar schon eine Lösung gefunden, aber mich würde mal interessieren, warum das so ist?

Functions-Problem

Functions-Problem

Forumregeln