Einzelnen Beitrag anzeigen

Ulrich Wolf

Registriert seit: 12. Dez 2003
Ort: Lendsiedel
23 Beiträge
 
#1

Undefinierter Bezeichner: 'VarArrayOf'

  Alt 18. Dez 2003, 15:55
Hallo,
bin gerade dabei ein in Delphi 5 geschriebenes Programm in Delphi 7 zu portieren. Dabei ist folgender Fehler
Undefinierter Bezeichner: 'VarArrayOf'
aufgetreten.
Die codezeile ist
Table3.Locate('Kennung ; Password', VarArrayOf([''+Kenn+'',''+Pass+'']),[]) = false der ganze Teil ist:
Delphi-Quellcode:
{ Hier beginnt der Quellcode für die Login-Überprüfung }
if StatusMelder = 1 then
 begin
  for n:=1 to length(gesendet) do
   if gesendet[n]='*then
    begin
     Wort := Copy( gesendet, x, n - x);
      if (Kenn <> '') and (Pass = '') then
       begin
       Pass := Wort;
       end;
      if Kenn = 'then
       begin
       Kenn := Wort;
       end;
     x := n+1;
     end;
   n := length(Kenn);
   Kenn := Copy( Kenn, 1, n-1);
  if
   Table3.Locate('Kennung ; Password', VarArrayOf([''+Kenn+'',''+Pass+'']),[]) = false
   then
    begin
    ServerSocket2.Socket.Connections[0].SendText('0');
    exit;
    end;
  if
   Table3.Locate('Kennung ; Password', VarArrayOf([''+kenn+'',''+pass+'']),[]) = true
   then
    begin
    ServerSocket2.Socket.Connections[0].SendText('1');
    exit;
    end;
  end;
{ Hier ENDET die LOGIN-Überprüfung }
Waum kommt hier die Fehlermeldung und wie kann ich sie beheben.
Viel Grüße
Ulrich Wolf
  Mit Zitat antworten Zitat