Fehler: Inkompatible Typen - 'Char' und 'String'?

[bernau]

Zitat von alzaimar:

Zitat von bernau:

Das Set selber kann 256 verschiedene Elemente beinhalten. In diesem Fall sind es 26+26+10 = 62. Das sind weniger als 256.

Das ist zwar richtig, für das 'SET' aber irrelevant. Bei einer Menge ist nicht die Anzahl der Elemente limitiert, sondern die höchste Ordnungszahl eines Elementes.

Hast Recht.

[bernau]

Zitat von alzaimar:

Es kann sein, das Delphi 2009 dies für 'Set Of Char'-Ausdrücke anders implementiert.

Habe D2009 mal gestartet und folgenden Code Compiliert

Delphi-Quellcode:

var 
  i : Integer; 
begin 
  result := 0; 
  for i := 1 to Length(zeichenkette) do 
    if zeichenkette[i] in ['A'..'Z','a'..'z','0'..'9'] then 
       result := result + 1; 
end;

und folgenden Hinweis bekommen:

[DCC Warning] Unit1.pas(34): W1050 WideChar reduced to byte char in set expressions. Consider using 'CharInSet' function in 'SysUtils' unit.

Damit dürfe schon einiges beantwortet sein.

So lange im Set nur Zeichen bis #255 vorhanden sind, und das ist bei "altem" Sourcecode immer der Fall, gibt's erst mal keine Probleme.
(Ausser den ganzen Warnings, die erscheinen. )

[Viktorii]

Zitat von bernau:

(Ausser den ganzen Warnings, die erscheinen. )

Und wie bekommt man die weg?

Bei mir kommen die beispielsweise bei solchen Funktionen, welche ich oft verwende:

Delphi-Quellcode:

procedure TMainForm.EditFredKeyPress(Sender: TObject;
  var Key: Char);
begin
  If not(key in [#48..#57,#8])
    then key := #0;
end;

[bernau]

Zitat von Viktorii:

Und wie bekommt man die weg?

Steht in der Warnig drinne:

Zitat:

Consider using 'CharInSet' function in 'SysUtils' unit.