Nur Zahlen aus einem String zulassen

[emsländer]

Hi,

kleines Problem:

der Compiler meckert das an:

aValue[j] := aValue[i];

Der Linken Seite kann nichts zugewiesen werden.


ich hab das Ding jetzt so eingebaut:

Delphi-Quellcode:

function OnlyNumbersInString (const aValue : String) : String;
var
  i, j: integer;
  aChars : TSetofChars;
begin
  aChars := ['0'..'9'];
  j := 0;
  for i := 1 to Length(aValue) do
  begin
    if (aValue[i] in aChars) then
    begin
      inc(j);
      aValue[j] := aValue[i];
    end;
  end;
  SetLength(aValue, j);
end;

Gruss

EL