Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by barnti,
3. Mär 2004
Hi,
ich habe den Hinweis auf der Borland-Seite gefunden. Da ich aber einen anderen Workarround gefunden habe belasse ich es dabei. Meine Lösung:
procedure TForm_Main.DBGridColEnter(Sender: TObject);
var mousedown: Smallint;
begin
if down then // Globale Variable, die bei der Navigation im Grid aus false gesetzt wird
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by barnti,
3. Mär 2004
Hallo HolyCow,
kannst Du Deine Lösung vielleicht ein wenig mit Kommentaren versehen. Ich komme so damit nicht ganz klar! Bitte Erläutere die Vorgehensweise um die Anpassungen vorzunehmen.
Danke vielmals,
Gruß,
Barnti
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by barnti,
1. Mär 2004
Hi,
ich würde gern in meinen TDBGrids 'drag and drop' verwenden, und so neue Datensätze in einer Tabelle anlegen. Leider habe ich mit den folgenden Versuchen keinen Erfolg:
// Drag beginnen
procedure TForm_Main.DBGrid_MasterMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if Button =mbleft then DBGrid_Master.BeginDrag(false);