![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Delphi 7
Форумчанин
Регистрация: 10.02.2009
Сообщений: 354
|
![]()
вообщем идея такова.
там где цыфры выпадает PopupMenu2 сделаный код ниже работает превосходно, минус в том что он допускает только длину в 10 знаков а у меня их больше! помогите! Код:
Дайте мне власть и я переверну ваш мир!...
Последний раз редактировалось Stilet; 01.06.2009 в 09:32. |
![]() |
![]() |
![]() |
#2 |
Форумчанин
Регистрация: 29.05.2009
Сообщений: 384
|
![]()
Поменяйте TryStrToInt на TryStrToFloat. Перебор возможно.
|
![]() |
![]() |
![]() |
#3 |
Delphi 7
Форумчанин
Регистрация: 10.02.2009
Сообщений: 354
|
![]()
Evgeniy26
неа выделяет красным if TryStrToFloat(TTreeView(sender).Sel ec ted.text,MyInt) then begin
Дайте мне власть и я переверну ваш мир!...
|
![]() |
![]() |
![]() |
#4 |
Форумчанин
Регистрация: 29.05.2009
Сообщений: 384
|
![]()
Дак MyInt замениете на вещественный тип.
|
![]() |
![]() |
![]() |
#5 |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,543
|
![]()
используйте свойство Data специально предназначеное для хранения пользовательской информации
При создании пунктов treeview Код:
программа — запись алгоритма на языке понятном транслятору
Последний раз редактировалось Stilet; 02.06.2009 в 16:29. |
![]() |
![]() |
![]() |
#6 |
Delphi 7
Форумчанин
Регистрация: 10.02.2009
Сообщений: 354
|
![]()
evg_m
а куда это писать? sorry node.data:=1 node.data:=0; Объясните пожалуйста, куда это вписпть? node.data:=1 node.data:=0;
Дайте мне власть и я переверну ваш мир!...
Последний раз редактировалось KORN; 31.05.2009 в 06:44. |
![]() |
![]() |
![]() |
#7 |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,543
|
![]()
при создании пунктов
node:=treeview.additem(x,'txt0345') ; node.data:=1;
программа — запись алгоритма на языке понятном транслятору
|
![]() |
![]() |
![]() |
#8 |
Delphi 7
Форумчанин
Регистрация: 10.02.2009
Сообщений: 354
|
![]()
evg_m
объясни пожалуйста!! куда это писать??? node:=treeview.additem(x,'txt0345') ; node.data:=1;
Дайте мне власть и я переверну ваш мир!...
|
![]() |
![]() |
![]() |
#9 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]() Цитата:
I'm learning to live...
|
|
![]() |
![]() |
![]() |
#10 |
Delphi 7
Форумчанин
Регистрация: 10.02.2009
Сообщений: 354
|
![]()
Stilet у меня выделяет красным. а исходник можно? пожалуйста!!!
evg_m или Stilet ну объясните чайнику! плиззз!!! заранее спасибо!
Дайте мне власть и я переверну ваш мир!...
Последний раз редактировалось Stilet; 02.06.2009 в 16:27. |
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
программа цифровые часы на Паскале | ЯН_КА | Помощь студентам | 16 | 21.11.2010 13:40 |
Не могу сделать цифровые часы | sid | Общие вопросы Delphi | 25 | 16.12.2009 05:06 |
Не могу разобраться с TreeView | Den3D | Общие вопросы Delphi | 2 | 11.04.2009 17:10 |
Цифровые часы без фона | Roof | Помощь студентам | 13 | 22.07.2007 12:18 |