implement modification compatibility with dbctrls delphi
lazarus / 13-General

----------------------------------------------------------------------
Anonymous · 2005-11-08 20:25

Attention dear developers of Lazarus 
 
please implement this modification in order to maintain the
compatibility with the dbctrls of delphi. We had the need to port our
components to Lazarus it didn't work for the lack of this routine. 
 
Unit DbCtrls 
 
{TDBEdit} 
 
  TDBEdit = class(TCustomMaskEdit) 
  private 
  .
  .
   procedure CMGetDataLink(var Message: TLMESSAGE); MESSAGE
CM_GETDATALINK; / / routine to be implemented / / 
 
c:\lazarus\lcl\include\dbedit.inc 
 
procedure TDBEdit.CMGetDataLink(var Message: TLMessage); 
begin 
   Message.Result := Integer(FDataLink); 
end;  
 
Respectfully 
 
Silvio Guedes and 
Odilon Nelson
   :idea:

----------------------------------------------------------------------
Marc · 2005-11-09 10:26

Please bugrep this, messages here will be forgotten!