안녕하세요? 유승우 입니다.
소스 올려 드리겠습니다.
참조하세요.
If gdFocused in State then
Begin
Label1.Caption := 'Left ' + IntToStr(Rect.Left);
Label2.Caption := 'Right ' + IntToStr(Rect.Right);
Label3.Caption := 'Top ' + IntToStr(Rect.Top);
Label4.Caption := 'Bottom ' + IntToStr(Rect.Bottom);
Label5.Caption := 'FieldNo ' + IntToStr(Column.Field.FieldNo);
Label6.Caption := 'RecNo ' + IntToStr(Table1.RecNo);
End;
혹시나 하니까, 메일로 컴파일가지 된 화일을 올려 드리겠습니다.
그럼 이만.
|