mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-02 00:32:30 +02:00
Added some code to make the interbae components work better.
Shane git-svn-id: trunk@458 -
This commit is contained in:
parent
ffa1dda0c4
commit
33efd6b9a0
@ -23,11 +23,22 @@ unit idecomp;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
{ $DEFINE DATABASE}
|
||||
{ $DEFINE INTERBASE}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, LclLinux, StdCtrls, Forms, Buttons, Menus, ComCtrls,
|
||||
Spin, SysUtils, Controls, CompReg, Graphics, ExtCtrls, Dialogs; //,db;
|
||||
Spin, SysUtils, Controls, CompReg, Graphics, ExtCtrls, Dialogs
|
||||
|
||||
{$IFDEF DATABASE}
|
||||
,db
|
||||
{$ENDIF}
|
||||
{$IFDEF INTERBASE}
|
||||
,interbase
|
||||
{$ENDIF}
|
||||
;
|
||||
|
||||
|
||||
type
|
||||
@ -301,10 +312,13 @@ begin
|
||||
|
||||
RegisterComponents('Samples','Spin',[TSpinEdit]);
|
||||
|
||||
// RegisterComponents('Data Access','Db',[TDatasource,TDatabase]);
|
||||
|
||||
// RegisterComponents('Interbase Data Access','Interbase',[TIBStoredProc,TIBQuery,TIBDatabase]);
|
||||
|
||||
{$IFDEF DATABASE}
|
||||
RegisterComponents('Data Access','Db',[TDatasource,TDatabase]);
|
||||
{$ENDIF}
|
||||
{$IFDEF INTERBASE}
|
||||
//Interbase
|
||||
RegisterComponents('Interbase Data Access','Interbase',[TIBStoredProc,TIBQuery,TIBDatabase]);
|
||||
{$ENDIF}
|
||||
// unselectable components
|
||||
// components that are streamed but not selectable in the IDE
|
||||
RegisterComponents('','ExtCtrls',[TPage]);
|
||||
|
@ -424,7 +424,6 @@ begin
|
||||
//trying to prevent some key actions....
|
||||
//this didn't work....
|
||||
//if not (csAcceptsControls in TControl(Sender).ControlStyle) then gtk_widget_set_sensitive(PgtkWidget(TWinControl(sender).Handle),False);
|
||||
|
||||
if (Sender is TCustomComboBox) then
|
||||
begin
|
||||
gtk_combo_disable_activate(PGTKCombo(TWinControl(sender).handle));
|
||||
@ -3359,8 +3358,8 @@ end;
|
||||
{ =============================================================================
|
||||
|
||||
$Log$
|
||||
Revision 1.76 2001/11/21 19:32:33 lazarus
|
||||
TComboBox can now be moved in FormEditor
|
||||
Revision 1.77 2001/11/26 14:19:34 lazarus
|
||||
Added some code to make the interbae components work better.
|
||||
Shane
|
||||
|
||||
Revision 1.75 2001/11/21 14:55:33 lazarus
|
||||
|
Loading…
Reference in New Issue
Block a user