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

Вниз

TDBGridEh и GetEditText(X, Y)   Найти похожие ветки 

 
kingdom2000   (2003-05-16 19:07) [0]

У меня есть TDBGridEh хочу использовать GetEditText(X, Y) делаю следующее

procedure TDBGridEh MouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);
Var
Str:String;
GCord: TGridCoord;
Begin
GCord:= TDBGridEh (Sender).MouseCoord(X, Y);
Str:= TDBGridEh.GetEditText(GCord.X, GCord.Y);
End;

Но компилятор ругается, говорит, что не знает что такое GetEditText(X, Y)
Подскажите, как подключить GetEditText(X, Y), чтобы получить текст из ячейки TDBGridEh.


 
Johnmen   (2003-05-16 23:56) [1]

Да ты просто вдумайся, что означает это строка !!!

Str:= TDBGridEh.GetEditText(GCord.X, GCord.Y);

это, извини, бред...:)


 
sniknik   (2003-05-17 01:26) [2]

не знаю такого зверя как TDBGridEh но в стандартном гриде до GetEditText достучатся можно через
TMyGreed = class(TDBGrid)
(как всегда :о)
Label1.Caption:= TMyGreed(DBGrid).GetEditText(1,1);

только смысла в этом мало (судя по всему пытается произвольный доступ к ячейкам сделать, независимо от положения курсора)
реализация метода не дает такой возможности (ARow просто не ипользуется, и не может не перемещая курсора это всетаки не стринггрид)
function TCustomDBGrid.GetEditText(ACol, ARow: Longint): string;
begin
Result := "";
if FDatalink.Active then
with Columns[RawToDataColumn(ACol)] do
if Assigned(Field) then
Result := Field.Text;
FEditText := Result;
end;

естественно это для стандартного грида, в TDBGridEh может все по другому сделано.


 
kingdom2000   (2003-05-20 12:05) [3]

Vsem spasibo!



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

Форум: "Базы";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.011 c
14-26768
Sewix
2003-05-17 09:19
2003.06.09
Kylix готовое пиложение


1-26594
OMen
2003-05-28 16:06
2003.06.09
Запуск других приложений.


3-26409
Dimaz-z
2003-05-21 22:25
2003.06.09
Ещё одна проблема с упаковкой таблицы!!! Помогите пожалуйста!


1-26475
Raduga
2003-05-29 13:29
2003.06.09
Копирование большого файла


14-26701
PelMen
2003-05-20 15:25
2003.06.09
Задача коммивояжера





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