Search options (Page 307 of 400)

Yes, you can use the variables for other procedures.

To assign values, you should use procedures (also events), you can't assign values without procedure, like in your example.
Unfortunately I do not understand exactly what you do not understand )

1) В таблице main, связь id_task была лишняя, удалил.
2) Сделал.
3) Вместо этого сделал вычисляемое поле в таблице main.statusControl2, поэтому поля statusYes и statusControl можете удалить, также CheckBox1 на форме frmAddInspection
4) К сожалению это не поддерживается, но вы можете например изменять цвет надписи.

также исправил пару ошибок,

1.  на форме frmAddInspection,  в настройках компонента TableGrid1, необходимо снять галочку "Включить автовыполнение запроса", иначе будут показаны все задачи всех проектов.

2. процесс вашего проекта оставался висеть в памяти после закрытия, так как главная форма frmLogin не закрывалась, при закрытии формы frmMain

Исправленный проект приложил к письму.

Просто туда же вписать

procedure Form1_OnShow (Sender: string; Action: string);
begin
     frmLogin.edPassword.PasswordChar := '*';
     frmLogin.ShowModal; 

    Form1.ComboBox1.dbAddRecord(1, 'LastName field');
    Form1.ComboBox1.dbAddRecord(2, 'FistName field');
    Form1.ComboBox1.dbAddRecord(3, 'Field 1');
    Form1.ComboBox1.dbAddRecord(4, 'Field 2');
    Form1.ComboBox1.dbAddRecord(5, 'Field 3');
    Form1.ComboBox1.dbItemID:=1;
end;

begin
     if SQLExecute('SELECT count(id) FROM users;') = '0' then
     begin
         SQLExecute('INSERT INTO users (login, password, admin) VALUES ("admin", "admin", 1);');
         frmLogin.cbLogin.dbItemID:=1;
         frmLogin.edPassword.Text := 'admin';
     end;

     frmLogin.Button1.Default := True;
     frmcreche.cbUser.Enabled:=false;
end.

Yes, you can use global variables

example:

var
  i: integer;

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
begin
    i := i + 1;
    ShowMessage(i);
end;

В принципе это возможно реализовать с помощью скриптов, но как тогда создавать новые записи?

Возможно в вашем случае будет полезен компонент PageControl
где вы сможете группировать текстовые поля на вкладках.

alex842
2) Компонент TNextGrid
из скрипта к нему можно обратиться просто по имени, например Form1.TableGrid1

если вы хотите создать данный грид с помощью скрипта, тогда его необходимо объявить так:

var
   Grid: TdbStringGridEx; 

3) Так задумано, вряд ли когда то это изменится.

4) В ближайших версиях пока ничего масштабного не планируется.

Приветствую,

в последнюю бета версию (1.50) добавил функцию.
https://www.dropbox.com/s/0m799p8qxh5kb … 0.zip?dl=0

ChangeKeyboardLayout(LANG_RUSSIAN); 
ChangeKeyboardLayout(LANG_ENGLISH); 

для переключения доступны и все остальные языки.

LANG_INVARIANT
LANG_AFRIKAANS
LANG_ALBANIAN
LANG_ARABIC
LANG_BASQUE
LANG_BELARUSIAN
LANG_BULGARIAN
LANG_CATALAN
LANG_CHINESE
LANG_CROATIAN
LANG_CZECH
LANG_DANISH
LANG_DUTCH
LANG_ENGLISH
LANG_ESTONIAN
LANG_FAEROESE
LANG_FARSI
LANG_FINNISH
LANG_FRENCH
LANG_GERMAN
LANG_GREEK
LANG_HEBREW
LANG_HUNGARIAN
LANG_ICELANDIC
LANG_INDONESIAN
LANG_ITALIAN
LANG_JAPANESE
LANG_KOREAN
LANG_LATVIAN
LANG_LITHUANIAN
LANG_NORWEGIAN
LANG_POLISH
LANG_PORTUGUESE
LANG_ROMANIAN
LANG_RUSSIAN
LANG_SERBIAN
LANG_SLOVAK
LANG_SLOVENIAN
LANG_SPANISH
LANG_SWEDISH
LANG_THAI
LANG_TURKISH
LANG_UKRAINIAN
LANG_VIETNAMESE

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

if SQLExecute('SELECT Count(*) FROM users WHERE GetUserName LIKE ''' + GetUserName + '''') = 0 then
begin
                MessageDlg(('ВАМ ОТКАЗАНО В ДОСТУПЕ'),mtError, mbOK, 0);
                frmLogin.Close;
end;

Пожалуйста, приложите проект, постараюсь помочь.

Расскрасить компонент TableGrid необходимо с помощью скриптов, пример:
http://myvisualdatabase.com/forum/viewtopic.php?id=1063

Скорей всегда неверная настройка кнопки Поиск, а именно в первом списке присутствует компонент TableGrid, который же используется для вывода результатов поиска, просто уберите его из первого списка.