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

Вниз

Программное выделение ячеек StringGrid   Найти похожие ветки 

 
remlin   (2005-11-25 10:58) [0]

Здравствуйте!
Подскажите как программно выделить ячейку в StringGrid.
Например я редактирую Cells[1,1], а при нажатии клавиши Enter
переходим к Cells[2,1] -> Как в Excel
Заранее спасибо!


 
SergGG ©   (2005-11-25 11:07) [1]

Может так:

procedure TForm1.StringGrid1KeyUp(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
 if Key=vk_Return then StringGrid1.Row:= StringGrid1.Row+1;
end;


 
SergGG ©   (2005-11-25 11:30) [2]

Я понял чего тебе надо:

procedure TForm1.StringGrid1KeyUp(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
   with StringGrid1 do
       begin
         Canvas.Brush.Color:=clRed;
         Canvas.FrameRect(CellRect(Col,Row));
       end;
end;



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

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

Наверх




Память: 0.44 MB
Время: 0.015 c
2-1133369413
zxc
2005-11-30 19:50
2005.12.18
как из тхт заданное число символов прочитать


2-1133718346
333
2005-12-04 20:45
2005.12.18
PageControl


14-1132938352
Fl@sh
2005-11-25 20:05
2005.12.18
Приглашение в Украину!!


2-1133518087
JTAG
2005-12-02 13:08
2005.12.18
Краеведы , посоветуйте в чем могет быть причина


14-1133010638
Mike Kouzmine
2005-11-26 16:10
2005.12.18
Японцы посадили спутник на астероид.





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