Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.03.2009, 14:37   #1
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
По умолчанию TreeView как сделать, чтобы попап-меню выпадало для определенных ветвей?

мне надо чтоб в разделах там где цыфры
выпадал PopupMenu2 как это реализовать?

ывыфоврфыо
fgdfgdsgyfsyfd
424242131315

выпадает только там где цыфры, а значит только в 424242131315 заранее большое человеческое спасибо!
Дайте мне власть и я переверну ваш мир!...
KWN, lnc вне форума Ответить с цитированием
Старый 05.03.2009, 14:54   #2
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Клоны этой темы:
http://programmersforum.ru/showthread.php?t=40668
http://programmersforum.ru/showthread.php?t=40542
http://programmersforum.ru/showthread.php?t=39054
Итого 4 кросспоста.
Человек прямо-таки напрашивается на бан...
mihali4 вне форума Ответить с цитированием
Старый 05.03.2009, 22:45   #3
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
По умолчанию

mihali4 извини но мне так и неответили все эти темы были моими и их закрывали, то из-за того что повторялось что-то то из-за кого то... а ответ я и не получил... ну так как уважаемые программисты сделать это? или это всетаки невозможно (что врятли)... ???
Дайте мне власть и я переверну ваш мир!...
KWN, lnc вне форума Ответить с цитированием
Старый 05.03.2009, 22:58   #4
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Это-то чем не ответ:
(из http://programmersforum.ru/showthread.php?t=39054)
Цитата:
Сообщение от Stilet Посмотреть сообщение
Код:
procedure TForm1.TreeView1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
if Button=mbright then begin
 if (sender = TreeView1) and (TTreeView(sender).Selected<>nil) then begin
  TTreeView(sender).Selected:=TTreeView(sender).GetNodeAt(x,y);
  if TTreeView(sender).Selected.text='wer' then
   PopupMenu1.Popup(Mouse.CursorPos.X,Mouse.CursorPos.y);
 end;
end;
end;
Или просто "уму не хватает" заменить строку 'wer' на строку с цифрами? А PopupMenu1 на PopupMenu2?
Так мы его вложить не можем.

Последний раз редактировалось mihali4; 05.03.2009 в 23:47.
mihali4 вне форума Ответить с цитированием
Старый 06.03.2009, 07:15   #5
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
По умолчанию

mihali4 прикол в том что цифры могут быть любыми, пользователь сам создает подраздел с цыфрами а прога должна сама отсекать там где цыфры там и определеный PopupMenu... вот о чем речь...
Дайте мне власть и я переверну ваш мир!...
KWN, lnc вне форума Ответить с цитированием
Старый 06.03.2009, 08:24   #6
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
KWN, lnc
Фух... Я чет не понял, что ты хочеш.
Тебе что нужно менять содержимое меню в зависимости от содержимого ветки?
Если я правильно понял еще один твой бзик то тебе нужно проверку делать, цифры ли тут или нет:

Код:
if tryStrToInt(TTreeView(sender).Selected.text,MyInt) then
Где MyInt:integer;

Давай так ты задачу обьясняеш найполнейшим образом, с примерами и пояснениями, и не делаеш кучу дублей, ато бан
получиш серьезный.
I'm learning to live...

Последний раз редактировалось Stilet; 06.03.2009 в 08:27.
Stilet вне форума Ответить с цитированием
Старый 06.03.2009, 10:15   #7
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
По умолчанию

Stilet твой код, меня спас!
наконец-то! тольк почему он в подразделах не открывает PopupMenu2 ???

скажем

43424233232 // здесь открыл
-авываыав
-аываывкц
-4242423432 / а в под разделе НЕТ
Дайте мне власть и я переверну ваш мир!...
KWN, lnc вне форума Ответить с цитированием
Старый 06.03.2009, 11:25   #8
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Я так сказать не могу, приаттачивай проект - посмотрим че ты там навертел.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 06.03.2009, 11:40   #9
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
По умолчанию

Stilet вот проект...
у меня он почему т не везде открывает PoupMenu а только воВтором разделе... а идея такова ВЕЗДЕ ТАМ ГДЕ ЦЫФРЫ открывает PoupMenu
Вложения
Тип файла: rar help.rar (4.8 Кб, 10 просмотров)
Дайте мне власть и я переверну ваш мир!...
KWN, lnc вне форума Ответить с цитированием
Старый 06.03.2009, 18:28   #10
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
Восклицание

Stilet поможешь? или все же, сам непонел? (запутался)
Дайте мне власть и я переверну ваш мир!...

Последний раз редактировалось KWN, lnc; 06.03.2009 в 18:34.
KWN, lnc вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
TreeView как сделать, чтобы попап-меню выпадало для определенных ветвей? KWN, lnc Помощь студентам 4 03.03.2009 17:04
Как написать,чтобы одна таблица заполнялась на основании другой при определенных условиях Alexm77 Microsoft Office Excel 21 26.05.2008 23:35
Копирование перетаскиванием ветвей TreeView Arteom Компоненты Delphi 2 26.01.2008 20:13
как сделать в дельфи меню... Илюха Общие вопросы Delphi 7 19.11.2007 22:15