Вниз
Скачать: CL | DM;

Grid Grid Grid... от TMS   Найти похожие ветки 

 
Nick_serov   (2006-04-04 13:49) [0]

Скачал компонент от TMS GridPack. Довольно симпатичный Grid. С табличками я еще не работал в Делфях, но тут пришлось...
Подскажите плиз, как задать переменной номер выделенного в данный момент столбца и строки!!!   Замучился...


 
Sergey13 ©   (2006-04-04 13:54) [1]

2Nick_serov   (04.04.06 13:49)
>как задать переменной номер выделенного в данный момент столбца и строки!!!  
А зачем тебе это?


 
Nick_serov   (2006-04-04 14:17) [2]

> как задать переменной номер выделенного в данный момент
> столбца и строки!!!  
> А зачем тебе это?

(скорее всего тему надо переместить в "Начинающим")
Опишу проблему полностью:

У меня есть табличка Excel, я к ней обращаюсь

if
OD1.Execute then
begin
 n := OD1.FileName;
 ExAp1.Workbooks.Add(n,0);
 ExW1.ConnectTo(ExAp1.ActiveWorkbook);

и гружу в Grid

for j := 1 to 9 do
begin
grid1.Cells[j,i] := ExAp1.Cells.Item[i,j].Value ;
end ;
ExW1.Close;

Появляется в Grid"e табличка с 9-ю колонками, в последней колонке отображается цена. Мне эту цену нужно изменить в зависимости от размера под определенный процент и поместить в следующую колонку.  Вот как это сделать????


 
Nick_serov   (2006-04-04 14:22) [3]

Как узнать положение в Таблице тока шо разобрался, банальная вещь =)))

для колонки:

procedure TForm1.grid1Click(Sender: TObject);
begin
d := grid1.col;
edit2.Text := inttostr(d);
end;

для строки : grid1.row;

а вот как взять значение из последней колонки для всего товара (Цена), по определенному её изменить и вставить в следующую колонку остается пока проблемой!


 
Nick_serov   (2006-04-04 14:58) [4]

Вот еще несколько конкретных вопросов:

Как из выделенной ячейки выхватить текст и вставить например в Memo?

как организовать поиск в таблице?



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.03 c
2-1143993100
SamProf
2006-04-02 19:51
2006.04.16
Как запустить службу?


2-1144144175
Nick_serov
2006-04-04 13:49
2006.04.16
Grid Grid Grid... от TMS


2-1143797397
Xmen
2006-03-31 13:29
2006.04.16
Распечатка в QuickReport


2-1144000332
Malik
2006-04-02 21:52
2006.04.16
Работа с "левыми" приложениями


15-1143125776
ZeFiR
2006-03-23 17:56
2006.04.16
Преобразование картинки в ASCII символы




   Наверх