Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Центр помощи > [делфи]АИС

Автор: Sunfrag 20.5.2012, 19:14

вобщем пытаюсь написать АИС на делфи. в основе база акцеса. но при переносе таблиц на форму, они начинают перекрывать друг друга. как на синтаксисе будет выглядеть описание кнопки, попеременно присваивающей атрибуты visible и enabled соответствующим таблицам? или если есть другой способ, опишите, пожалуйста. smile

Автор: Данкинг 20.5.2012, 20:09

Каких таблиц? Каким образом "перекрывать"?

Автор: Telepyz 20.5.2012, 22:45

Зная что такое АИС, ты не можешь нормально сформулировать вопрос...?? smile

Автор: Sunfrag 21.5.2012, 04:48

таблицы access при переносе на форму получаются одна поверх другой. как бы так и должно быть, чтобы они находились, так сказать, в рабочей зоне будущей программы, но не могу реализовать попеременную их видимость и доступность

Автор: Данкинг 21.5.2012, 10:21

А нельзя сделать один грид, в который запросом выводить нужную таблицу и нужные поля?

Автор: Telepyz 21.5.2012, 20:27

Код в студию..

Автор: Sunfrag 22.5.2012, 10:29

unit X;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, ADODB, Grids, DBGrids, ExtCtrls, DBCtrls, DBTables, StdCtrls;

type
  TForm1 = class(TForm)
    ds1: TADODataSet;
    ds2: TDataSource;
    dbgrd1: TDBGrid;
    ds3: TADODataSet;
    ds4: TDataSource;
    dbgrd2: TDBGrid;
    tbl1: TTable;
    tbl2: TTable;
    Next: TButton;
    procedure NextClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.NextClick(Sender: TObject);
begin
if dbgrd2 (Visible=True and Enabled=True);
then dbgrd2:=(visible:=False and Enabled:=False);
else dbgrd1:=(visible:=true and Enabled:=true);
end;
end.

Добавлено через 1 минуту и 21 секунду

Цитата(Данкинг @ 21.5.2012, 10:21)

А нельзя сделать один грид, в который запросом выводить нужную таблицу и нужные поля?

если вам не сложно, опишите, пожалуйста, пошагово?