Ubuntu Gutsy
GTK2 and GTK
Lazarus svn 14266
My DBEdit and my DBMemo is readonly, i need a workaround for continue my
work:
---------------------------
procedure TfrmAluno.FormActivate(Sender: TObject);
var
contador : integer;
begin
for contador := 0 to ComponentCount - 1 do
begin
if ((Components[contador] is TCustomEdit) and
(Components[contador].Tag <> 111)) then
(Components[contador] as TCustomEdit).ReadOnly := false;
end;
end;
----------------------------------------
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus
