Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.02.27;
Скачать: [xml.tar.bz2];

Вниз

Проблемка с 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.039 c
1-1108207995
Девушка
2005-02-12 14:33
2005.02.27
Как правильнее сделать форматированный вывод?


1-1108324327
mr-jack
2005-02-13 22:52
2005.02.27
события и всё такое


14-1107844205
AlexG
2005-02-08 09:30
2005.02.27
Это что такое?


3-1106822185
anat
2005-01-27 13:36
2005.02.27
ПЕРЕСЕЧЕНИЕ не СВЯЗАННЫХ ТАБЛИЦ


1-1108414574
Kubic
2005-02-14 23:56
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский