Bonjour à tous,
Tout d'abord je ne suis pas certain d'être sur le bon forum. Si c'est le cas d'avance toutes mes excuses.
J'ai un formulaire dans le lequel (bordereau), j'ai ce bout de script.
Mon souhait est d'affecté au champ nommé "AEBINTITULE" le texte suivant : "Journée du 02/06/2015"
c'est à dire le texte 'Journée du ' + la date du jour.
Et ceci à chaque nouvelle création de bordereau.
1 2 3 4 5 6 7 8 9 10 11 12 13
| procedure _OnClose(Sender, var Action);
begin
qCaisses.close;
end;
procedure dsElement_OnDataChange(Sender, Field);
begin
if DBLookupComboBox4.KeyValue <> null then
ExecuteSQL('UPDATE MP_ENTBORD SET AEBCAISSE=''' + DBLookupComboBox4.KeyValue + ''''+
' WHERE AEBPIECENO = ''' +
dsElement.Dataset.FieldByName('AEBPIECENO').AsString+ '''');
end; |
Quel code faut-il ajouter ?
Merci d'avance pour votre aide.
Daniel.
Partager