Не помню что в uses писать(

procedure TForm1.LoadPhoneClick(Sender: TObject);beginListPhone.Items.LoadFromFile(ExtractFilePath(Application.ExeName) + 'phone.Txt');end;
Есть такой код на загрузку данных в CheckListBox но вод блин забыл что в uses писать(Подскажите пожалуйста!!!
6 ответов

В смысле? А что там писать в данном случае, стандартный же компонент?  


Application.ExeName на это ругается(


Ну, Application объявлено в Forms. Добавлено через 48 секундТолько слеш перед 'phone.Txt' надо, т.е. '\phone.Txt'.


Только слеш перед 'phone.Txt' надо, т.е. '\phone.Txt'.
не нужен там слеш, ExtractFilePath уже с ним путь возвращает ;)


Спасибо огромное!!!Подскажите пожалуйста как узнать об окончании цикла с педусловием? Else не работает(
while Call.Status = clsInProgress do Sleep(10) else i:=1;


не нужен там слеш, ExtractFilePath уже с ним путь возвращает ;) 
Не знаю, я всегда ставлю.  
Подскажите пожалуйста как узнать об окончании цикла с педусловием? Else не работает(
Это в новую тему.