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

Вниз

Замена popmenu в tstringgrid е   Найти похожие ветки 

 
sashap   (2007-08-03 20:54) [0]

Добрый день!
Скажите, пожалуйста, как заменить стандартное Popmenu (undo/cut/copy/paste) в tstringgrid"е при редактировании ячейки на новое?


 
Efir ©   (2007-08-03 21:08) [1]

Указать для StringGrid ваше PopupMenu.


 
sashap   (2007-08-03 21:24) [2]

Спасибо за ответ, Efir!!! Это было быстро...
Если указать для StringGrid моё PopupMenu, то popmenu будет всплывать при нажатии в любую точку StringGrid"а. А мне нужно, чтобы заменялось стандартное popupmenu (undo/cut/copy/paste/delete/select all) при редактировании ячейки.

Но всё равно еще раз спасибо за столь быстрый ответ!!


 
{RASkov} ©   (2007-08-04 02:47) [3]

> [2] sashap   (03.08.07 21:24)
> А мне нужно, чтобы заменялось стандартное popupmenu (undo/cut/copy/paste/
> delete/select all) при редактировании ячейки.

[1]+
procedure TForm1.StringGrid1ContextPopup(Sender: TObject; MousePos: TPoint; var Handled: Boolean);
begin
 Handled:=not StringGrid1.EditorMode;
end;

?


 
sashap   (2007-08-04 10:09) [4]

Спасибо, {RASkov}!
Простите за глупость, но до меня что-то не доходит, что с этом нужно делать.
Т.е. я понимаю, что это нужно прописать в OnContextPopup у StringGrid"а. Но после этого ничего не меняется. И даже если в PopupMenu StringGrid"а указать мой Popmenu, как советовал Efir, то тоже ничего не меняется. Возможно, нужно поставить какие-то проверки, или использовать для вызова popmenu OnMouseDown?


 
begin...end ©   (2007-08-04 11:34) [5]

type
 TExStringGrid = class(TStringGrid)

TEdit(TExStringGrid(StringGrid).InplaceEditor).PopupMenu := MyPopupMenu


 
sashap   (2007-08-04 17:31) [6]

Благодарю, begin...end! Это то - что было нужно!!!



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

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

Наверх





Память: 0.45 MB
Время: 0.041 c
15-1185835085
DEMP
2007-07-31 02:38
2007.08.26
ОГРОМНАЯ Проблема


2-1185958244
\/iKTOR
2007-08-01 12:50
2007.08.26
Гафическое связывание таблиц


2-1186330517
KLAUS_
2007-08-05 20:15
2007.08.26
Xor части файла


15-1185882018
Rimd
2007-07-31 15:40
2007.08.26
InterBase


2-1186149707
DelphiLexx
2007-08-03 18:01
2007.08.26
Несинхронность OnSetText





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