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

Вниз

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

 
AlexeiBerkov ©   (2007-05-19 01:58) [0]

Народ.
Как-то я редко сталкивался с этим классом, но вот что заметил.
Есть класс TStringList.  Если по нему вызвать хелп и в методах перейти на Add то нам предложат пример, в котором создается экземпляр класса TStringList, после чего в него заносятся какие-либо значения. Вот собственно пример:


procedure TForm1.FormCreate(Sender: TObject);

var
 MyList: TStringList;
 Index: Integer;
begin
 MyList := TStringList.Create;
 try
   MyList.Add("Animals");
   MyList.Add("Flowers");

   MyList.Add("Cars");

   MyList.Sort;   { Find will only work on sorted lists! }
   if MyList.Find("Flowers", Index) then
   begin
     ListBox1.Items.AddStrings(MyList);
     Label1.Caption := "Flowers has an index value of " + IntToStr(Index);
   end;
 finally
   MyList.Free;
 end;
end;


Так вот... Если по дебагу просмотреть значение переменной , то мы увидим сто она... пустая!  Как быть?  Просто мне нужно сделать точно такую операцию - создать текстовый список и занести туда значения...  

Спасибо.


 
Германн ©   (2007-05-19 02:14) [1]


> Так вот... Если по дебагу просмотреть значение переменной
> , то мы увидим сто она... пустая!

Какую переменную ты имеешь в виду?


 
{RASkov} ©   (2007-05-19 03:47) [2]

> [0] AlexeiBerkov ©   (19.05.07 01:58)

[1]
+1
Что-то ну вообще ничего не понятно, что смотришь... кто пустая....

> Просто мне нужно сделать точно такую операцию - создать
> текстовый список и занести туда значения...  

Ну так в примере все отражено.... что не понятного?

> Если по дебагу просмотреть значение переменной

Если ты смотришь значение переменной MyList, то она после Create формы и будет пустой, ибо локальная переменная.... смотри ее значение в методе FormCreate....
В общем... ты давай определись с вопросом(проблемой).... ага?


 
Однокамушкин   (2007-05-19 09:01) [3]

А дебаг не показывает содержание классов... так, некоторые свойства... и сколько значений в список ни заноси, через дебаг их не увидишь...


 
Anatoly Podgoretsky ©   (2007-05-19 11:27) [4]

Забудь про "Debug"


 
Belorus ©   (2007-05-19 11:35) [5]

Всю жизнь смотрю дебагом содержимое экземпляров класса. Очень удобно. Никаких проблем пока не было. Наводишь в момент брякпоинта на переменную жмёшь Control и брякаешь мышь.


 
AlexeiBerkov ©   (2007-05-19 12:42) [6]


Однокамушкин   (19.05.07 09:01) [3]

А дебаг не показывает содержание классов... так, некоторые свойства... и сколько значений в список ни заноси, через дебаг их не увидишь...


Да! Действительно! Дебаг "выпендривается" именнос классом TStringList - не показывает его содержимое. Ниже приведён пример, доказывающий, что в TStringList всё-таки заносятся значения, но через дебаг их не видно


   cars := TStringList.Create;
   cars.Delimiter := " ";
   cars.QuoteChar := "|";
   cars.DelimitedText := "|Honda Jazz| |Ford Mondeo| |Jaguar "E-type"|";

   for i := 0 to cars.Count-1 do
     ShowMessage(cars[i]);


Закрыто!


 
Плохиш ©   (2007-05-19 13:41) [7]


> AlexeiBerkov ©   (19.05.07 01:58)  
> Народ.
> Как-то я редко сталкивался с этим классом

Ну мы используем только те классы, с которыми сталкиваемся по сотни раз каждый час...

> Да! Действительно! Дебаг "выпендривается" именнос классом
> TStringList - не показывает его содержимое.

Надо же, какой только глупости здесь не прочитаешь :-)


 
AlexeiBerkov ©   (2007-05-19 16:11) [8]


Надо же, какой только глупости здесь не прочитаешь :-)


Знаешь, когда блин сидишь в 3 часа ночи и видешь в дебаге NULL , то особо как-то не смешно



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

Форум: "Начинающим";
Текущий архив: 2007.06.10;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.041 c
15-1179343459
raqy.style
2007-05-16 23:24
2007.06.10
А в чем разница?


11-1161773246
Kirill
2006-10-25 14:47
2007.06.10
KolEdb


9-1153070015
Зм1й
2006-07-16 21:13
2007.06.10
"Вертикальная синхронизация"


15-1178608499
DemonP
2007-05-08 11:14
2007.06.10
портирование кода C++ -> Delphi


3-1174484710
Dmitry_177
2007-03-21 16:45
2007.06.10
DbiQExecDirect из BDE API (IDAPI) не выполняет SQL-запрос





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский