Jump to content

Problem with variables InternalReadOnly and SelfUpdating


Mauri

Recommended Posts

I am creating a custom component and looked UniGUI other components to see the methods used to manipulate data for example TUniCustomDBComboBox, TUniCustomDBMemo! In all they have an assignment for InternalReadOnly variable (InternalReadOnly: = not AllowEdit) and also compared the variable 'SelfUpdating', but realized that this variable is in UniGUIClasses class. I have put this class in the uses clause and when compiling is showing the following messages:
 
Undeclared identifier: 'InternalReadOnly'
Undeclared identifier: 'SelfUpdating'
 
What could be wrong?
 
Examples where it is being using:
 
 
unit ISComponet;

interface

uses Classes, Vcl.Graphics, DesignIntf, Controls, DBCtrls, DB,
     UniPanel, UniGUIClasses, UniGUIInterfaces, uniGUICoreInterfaces,
     UniGUITypes, UniDBUtils;

type

  TISComb = class(TISBase, IUniDBControl)
  private
    ...
    procedure ActiveChange(Sender: TObject);
    ...
  protected
    procedure DataChange(Sender: TObject); virtual;
    ...   
  public
    ...
  published
    ...
  end;

procedure Register;

implementation

procedure TISComb.ActiveChange(Sender: TObject);
begin
  if (not IsDesigning) and (not IsDestroying) then
    InternalReadOnly:= not AllowEdit;  // Here give problem compiling
end; 

procedure TISComb.DataChange(Sender: TObject);
begin
  if SelfUpdating then // Here give problem compiling
    Exit;
  ...
end;

...

Best Regards,

 

 

Mauri
 
Member ID: 00404
 
 
 
 
 
 
 
 

 

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...