Главная страница
    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.45 MB
Время: 0.009 c
3-26358
mrcat
2003-05-20 16:29
2003.06.09
Type mismatch in expression


3-26388
Wasilla
2003-05-21 14:04
2003.06.09
LangDriver in Table(change)


14-26739
Agent[007]
2003-05-18 18:47
2003.06.09
Setup.exe


3-26372
DDDeN
2003-05-20 09:17
2003.06.09
Работе с базой без BDE


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