
04.07.2008, 02:03
|
|
Постоянный
Регистрация: 05.01.2007
Сообщений: 508
С нами:
10182506
Репутация:
1393
|
|
Сообщение от Nightmarе
Ну а разница? Ругается на строку:
insert(copy(str,1,pos(';',str)-1), memo2.lines.add, 1);
И где в ней ошибка? Всё равно не пашет хоть как.
TStringList - рульная вешь
Код:
var
ss:Tstrings;
begin
ss:=TStringList.Create;
ss.LoadFromFile('uins.txt');
ss.NameValueSeparator:=';';
ICQClient1.UIN := StrToInt(ss.Names[1]);
ICQClient1.Password := ss.ValueFromIndex[1];
(c)Izos
Последний раз редактировалось z01b; 04.07.2008 в 02:33..
|
|
|