Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.27;
Скачать: CL | DM;

Вниз

Проблемка с TstringList   Найти похожие ветки 

 
Mensss   (2005-02-09 22:14) [0]

Написал несколько строк кода, но при работе вылетает ошибка отсутствия индекса переменной s. Помогите пожалуйста определить в чем причина?

procedure TForm1.Button1Click(Sender: TObject);
var
s:TstringList;
begin
s:=TStringList.Create;
s.Clear;
s[0]:="Privet,";
s.Add("Samson !!!");
Showmessage(s[0]);
s.Free;
end;


 
Leonid Troyanovsky ©   (2005-02-09 22:30) [1]


> Mensss   (09.02.05 22:14)  
> Написал несколько строк кода, но при работе вылетает ошибка
> отсутствия индекса переменной s. Помогите пожалуйста определить
> в чем причина?

..
> s.Clear;
> s[0]:="Privet,";

В ем.

--
Regards, LVT.


 
Mensss   (2005-02-09 22:31) [2]

А можеш объяснить почему эти строчки неправильные?


 
Leonid Troyanovsky ©   (2005-02-09 22:47) [3]


> Mensss   (09.02.05 22:31) [2]
> А можеш объяснить почему эти строчки неправильные?


Строки нормальные. Ошибочно такое их сочетание.
RTFM: Delphi help: TStringList.Clear, TStringList.Strings.

--
Regards, LVT.


 
Alexander Panov ©   (2005-02-09 22:52) [4]

Mensss   (09.02.05 22:14)

Изначально TStringList не содержит строк.


 
Anatoly Podgoretsky ©   (2005-02-09 22:59) [5]

У тебя нет строки с индексом 0


 
Юрий Зотов ©   (2005-02-09 23:12) [6]

> Mensss   (09.02.05 22:14)  


s.Clear; // Зачем очишать только что созданный список?
        // Он и так создается пустым.
s[0]:="Privet,"; // Список пуст. Откуда же в нем взялась
                // строка s[0]? Ее нет. А как можно что-то
                // присваивать тому, чего нет? Используйте Add.



Страницы: 1 вся ветка

Текущий архив: 2005.02.27;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.044 c
14-1107764243
juice
2005-02-07 11:17
2005.02.27
Обьект как данные-элемент


9-1102065795
lifo
2004-12-03 12:23
2005.02.27
Спрайт


1-1108031675
Gek1
2005-02-10 13:34
2005.02.27
Помогите побороть ошибку! И как работает свойство FreeOnTerminate


9-1101759322
NightFire
2004-11-29 23:15
2005.02.27
Помогите с разворотом


4-1105463184
aglar
2005-01-11 20:06
2005.02.27
Копирование директории





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский