tabelle nimmt keine einträge an

[Alf]

Hi: alle miteinander,

und DANKE DANKE DANKE
sofort eingefügt und siehe da, als währe nie was gewesen es funct.

lag wahrscheinlich an:

datasource1.DataSet := table1; das hatte ich nicht bei mir

-----------------------------------------------
Hallo Hansa
sorry : aber mit CASE kann ich nichts anfangen habe wahrscheinlich die eine Antwort falsch abgeschickt

-----------------------------------------------

wenns nicht Unferschämt is, würde ich vielleicht noch ne Frage stellen!?

BETRIFFT: DRAG AND DROP

möchte aus dem listenfeld den Dateinamen in das markierte Feld von MDBGRID ein fügen
probiere schon ne weile aber es will nicht

Delphi-Quellcode:

procedure TForm1.MDBGrid1DragOver(Sender, Source: TObject; X, Y: Integer;
  State: TDragState; var Accept: Boolean);
begin
      accept :=source is tfilelistbox;
end;

procedure TForm1.MDBGrid1DragDrop(Sender, Source: TObject; X, Y: Integer);
begin
       if (sender is tmdbgrid) and (Source is tfilelistbox) then
       begin
           with sender as tmdbgrid do
           begin
              //mdbgrid1.Fields[mdbgrid1.SelectedIndex].Value:=((source as tfilelistbox).filename);
              mdbgrid1.SelectedField.AsString:='neu';//((source as tfilelistbox).filename);
              //table1Track Name:=tfilelistbox.filename;
            end;
       end;
end;

ich weis nicht wie ich die markierte zelle herrausfinde;
auch hier wieder ewige versuche.

Gruß Alf