Hola Jovalca.
Tal vez esté interpretando mal la situación, pero ¿ No te sirve usar el evento
OnDragOver del
TEdit ?
Código Delphi
[-]
procedure TForm1.Edit1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
Accept:= False;
end;
Saludos