OBS/Makros und Scripting/Anwendungsbereiche/Customize xForms: Unterschied zwischen den Versionen

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
(Die Seite wurde neu angelegt: „Many women consider the jewels very good given as gifts as security if they are left alone to fend on a self-employed basis. Other investors consider jewels fo…“)
 
(Die Seite wurde neu angelegt: „==Allgemeine Funktionen== <syntaxhighlight lang="Delphi"> OnXCreate OnXVisible OnXClose </syntaxhighlight> Die Form wird als '''Frm''' übergeben. ==Speziel…“)
Zeile 1: Zeile 1:
Many women consider the jewels very good given as gifts as security if they are left alone to fend on a self-employed basis. Other investors consider jewels for you to become a family investment and buy them as security on their children to be able to turned into cash at various times of their activities.<br><br>Of course with every long term investment, investors must make sure that they can trust their investment along with their advisers. So who do you turn to when materials are advice about the purchase of diamonds and their quality and value? And really should diamonds be relied upon to provide you with a return in years to come.<br><br>This isn't all you have to think at. Also need to put brain is the recipient face shape. Understanding what kind of face shape not only beauty the recipient but also helps to generate out her best face features.<br><br>The black polished stone, along the particular very fine texture, makes onyx one of several most purchased varieties of quartz. This also in order to the black diamond. Like those on a chemical composition of silicon dioxide, and registers as a seven at the Mohs hardness scale.<br><br>If you cherished this short article and you would like to acquire more facts regarding august stephenson ([https://www.yelp.com/biz/august-stephenson-international-oldsmar click through the next article]) kindly stop by the site. Considerations. What sort of ring are going to practical on her behalf? Pointed style diamonds usually have prongs required catch on clothing. Take her job into thoughtfulness. If you want something really special, you can still visit the proper jewelry maker and facts your own ring, pretty. Of if you want to go even further, you can take a lost wax jewelry class for the local community college and make one yourself for the absolute, most special diamond engagement ring you could possibly give her very own.<br><br>Watch Camp Rock 2: The Final Jam Online with free streaming - To every JONAS Brothers and Disney fans, our long wait is excessively. The much awaited premiere belonging to the Camp Rock: The Final Jam approximately to happen on September 3, the new year. The Camp Rock 2: Closing Jam could be the sequel for the blockbuster hit in Disney Channel the camp ground Rock within in 2008 which stars the gorgeous Jonas Brothers and Demi Lovato.<br><br>Yes, charm bracelets happen to around for quite some time now, the reason why would interest peak enjoying a as instead of choosing to any a variety of other? It's all about personas. A charm bracelet out the box is not more when compared to a manufacturer or designer telling you who they think you must be. The ability to customize a charm bracelet is you telling the field of who invariably you typically. Diamond charms add barely of elegance and luxury to a currently teen-driven jewelry trend.
==Allgemeine Funktionen==
 
<syntaxhighlight lang="Delphi">
OnXCreate
OnXVisible
OnXClose
</syntaxhighlight>
 
Die Form wird als '''Frm''' übergeben.
 
==Spezielle Zusatzaufrufe==
===Beispiel: Rechnung per Mail/Fax===
 
<syntaxhighlight lang="Delphi">
OnEdInit
OnEdSave
</syntaxhighlight>
<syntaxhighlight lang="Delphi">
function OnEdSave():string;
begin
end; 
 
function OnEdInit():string;
var oAutoMail        : TxCheckBox;
    oFaxEMailDrucken  : TxCheckBox;
    oOldDate          : TxCheckBox;
begin
  oAutoMail        := NIL;
  oFaxEMailDrucken  := NIL;
  oOldDate          := NIL;
 
  if (Assigned(FrmEdit)) then begin
      oAutoMail        := TxCheckBox(FrmEdit.FindComponent('cb_automail'));
      oFaxEMailDrucken := TxCheckBox(FrmEdit.FindComponent('cb_FaxEMailDrucken'));
      oOldDate        := TxCheckBox(FrmEdit.FindComponent('cb_OldDate'));
  end;
   
  if (Assigned(oAutoMail)) then begin
      oAutoMail.checked := True;
      Meldung('oAutoMail'); 
  end;
 
  if (Assigned(oFaxEMailDrucken)) then begin
      oFaxEMailDrucken.checked := True; 
      Meldung('oFaxEMailDrucken'); 
  end;
 
  if (Assigned(oOldDate)) then begin
      oOldDate.checked := True; 
      Meldung('oOldDate'); 
  end;
 
end;
</syntaxhighlight>

Version vom 24. Juli 2020, 10:17 Uhr

Allgemeine Funktionen

OnXCreate
OnXVisible
OnXClose

Die Form wird als Frm übergeben.

Spezielle Zusatzaufrufe

Beispiel: Rechnung per Mail/Fax

OnEdInit
OnEdSave

function OnEdSave():string;
begin 
end;  

function OnEdInit():string;
var oAutoMail         : TxCheckBox;
    oFaxEMailDrucken  : TxCheckBox;
    oOldDate          : TxCheckBox;
begin 
   oAutoMail         := NIL;
   oFaxEMailDrucken  := NIL; 
   oOldDate          := NIL;

   if (Assigned(FrmEdit)) then begin
       oAutoMail        := TxCheckBox(FrmEdit.FindComponent('cb_automail')); 
       oFaxEMailDrucken := TxCheckBox(FrmEdit.FindComponent('cb_FaxEMailDrucken')); 
       oOldDate         := TxCheckBox(FrmEdit.FindComponent('cb_OldDate')); 
   end;
    
   if (Assigned(oAutoMail)) then begin
       oAutoMail.checked := True;
       Meldung('oAutoMail');   
   end;
   
   if (Assigned(oFaxEMailDrucken)) then begin
       oFaxEMailDrucken.checked := True;   
       Meldung('oFaxEMailDrucken');   
   end;
   
   if (Assigned(oOldDate)) then begin
       oOldDate.checked := True;   
       Meldung('oOldDate');   
   end;
   
end;
Abgerufen von „http:///index.php?title=OBS/Makros_und_Scripting/Anwendungsbereiche/Customize_xForms&oldid=58065“