03.07.2008, 00:43
|
|
Banned
Регистрация: 16.07.2007
Сообщений: 79
С нами:
9905879
Репутация:
337
|
|
Nightmarе
Код:
if str[i]=';' then
begin
insert(copy(memo1.line,1,i-1),memo2.line,1)
end;
И так же с паролями, только заменив:
Код:
insert(copy(memo1.line,i+1,length(str)-i),memo3.line,1);
|
|
|