Question

This is a simple question but I don’t know how to construct a variable name by concatenating two strings. The code below is how not to do it…

var
  UserName1 : String;
  UserName2 : String;
  Password1 : String;
  Password2 : String;
  UserCount : Integer;

UserCount := 2;

for Wk1 := 1 to UserCount do
begin
  DoLogin(UserName+Wk1, Password+Wk1);
end;  

Answer 1

Basically, you can’t do this. Variable names are fixed at compile time and translate to addresses which hold the value of the variables.

It looks like you want an array, or in this case, two: one array will hold the login names and one array the password. Of course, you could combine the two into a record and then have an array of records.

type
 LogType = record
            username, password: string[31]
           end;

var
 LogArray: array [1..10] of logtype;
 usercount, wk1: integer;

begin
 UserCount := 2;
 for Wk1 := 1 to UserCount do
  begin
   DoLogin(logarray[wk1].username, logarray[wk1].password);
   etc
  end;
end;