Hi,
also ich verstehe das so das du immer nur den Wert der 3. Zelle der Zeile draggen willst, auch wenn in der Zeile das Drag&Drop beispielsweise über der 2. Zelle der Zeile begonnen wurde.
Dafür brauchst du nur die Nummer zu ändern:
Delphi-Quellcode:
procedure TForm3.Edit1DragDrop(Sender, Source: TObject; X, Y: Integer);
begin
(Sender as TEdit).Text := (Source as TStringGrid).Cells[3,(Source as TStringGrid).Row];
//Die 3 steht für die 3. Zelle der Zeile
end;