Maske Betiği ile Maskeleri Programlama

Tasarım ve Kod

Maske tasarımcısında F12 Tasarım ile Kod arasında geçiş yapar. F9 betiği denetler, F1 „Betiğin neler yapabildiği?“ yardımını açar; 35 örnek içerir ve çift tıklayarak ekleyebilirsiniz. Dil Pascal (netPascalScript), isimler İngilizcedir.

Olaylar

• Maske: BeforeOpen, AfterOpen, BeforeSave, AfterSave, BeforeClose, OnValidate.
• Alan: OnEnter, OnExit, OnChange, OnClick.

Nesne denetleyicisinde (yeni) „Olaylar“ sekmesinde uygun rutini oluşturun, örneğin FormBeforeSave. Boş rutinler kaydederken netERP tarafından kaldırılır.

Örnek

procedure FormBeforeSave(Sender: TObject);
begin
  if Form.Field('description') = '' then
    Form.Cancel('Lütfen tanımı girin.');
end;

procedure CodeOnExit(Sender: TObject);
begin
  Form.SetField('code', UpperCase(Form.Field('code')));
  Form.SetEnabled('zip', Form.Field('country') = 'DE');
end;

Betik neler yapabilir

Alanları okuma ve ayarlama (Form.Field, Form.SetField), alanları gizleme/gösterme veya kilitleme (SetVisible, SetEnabled), odak ayarlama, bir bölümü açma, mesaj ve onay kutuları gösterme (Message, Confirm) ve kaydetme ya da kapatma işlemini iptal etme (Form.Cancel). Form.IsNew, Form.Module ve Form.Id kayıt hakkında bilgi verir. Alan anahtarları maske tasarımından gelir.

Betikteki bir hata yalnızca bir kez bildirilir; maske kullanılabilir kalır. Yalnızca Form.Cancel bir işlemi iptal eder.