pos и copy

[zotox]

if Radiobutton1.Checked=true then
begin
n:=strtoint(edit1.Text);
for i:=0 to N do
begin
k:=pos(';',Icqpass.Lines[i]);
ICQClient1.UIN:=copy(Icqpass.Lines[i],0,k-1); //Icqpass = Наш мемо1
ICQClient1.Password:=copy(Icqpass.L ines[i],k+1,length(Icqpass.Lines[i])-k);
ICQClient1.Login();
end;


ругаеться на строку uin и еще на какую то после уина...
пишет

"Incompatible types: 'cardinal' and 'string' "

[Ozerich]

ICQClient1.UIN:=strtoint(copy(Icqpa ss.Lines[i],0,k-1));