Passage des paramètres utils à une fonction/proceduresRésolu

Question

Bonjour, 

J'ai récupéré du code ou seuls les paramètres utilisés étaient passé a l'appel de la fonction. J'ai vu cela dans un source OLE Excel et la syntaxe est la suivante:

Ex.ActiveWorkBook.SaveAs(Filename := SaveAsFileName, FileFormat := 56);

Filename et FileFormat sont bien des paramètres du SaveAS mais lorsque je compile l'exemple sous Delphi 7 le compilateur rejette l'instruction avec le message:

identificateur non déclaré : 'Filename'

Existe-t-il un directive de compilation permettant cette syntaxe ?

Si quelqu'un connait la solution je serais bien content de la découvrir...

Merci d'avance.
Michel

sp40 · Answer

Salut,

Tu peux poster la procédure complète ? (ou l'unité même...)
 
Simon

cs_yanb · Answer

Salut,
Le SaveAs d'un ActiveWorkBook ressemble plus à ceci sous D7:
procedure SaveAs(Filename: OleVariant; FileFormat: OleVariant; etc...);
Exemple d'utilisation
Ex.ActiveWorkBook.SaveAs(SaveAsFileName, 56, etc...); 
@+

dubois77 · Answer

Salut
Dans tous les cas la syntaxe delphi est mauvaise
au minimun cela doit ressemble à celà :
Ex.ActiveWorkBook.SaveAs(Filename := SaveAsFileName, FileFormat := 56);  devient :
Ex.ActiveWorkBook.SaveAs(Filename :string = SaveAsFileName, FileFormat :integer = 56); 

pas de := dans le passage de paramètres !

korgis · Answer

Salut,

Le 2ème paramètre est le format par défaut, il n'est donc pas forcément utile de le préciser.

La syntaxe correcte est celle-ci, 'C:\MonFichier.xls' étant le fichier de destination de la sauvegarde du classeur actif :

var
  FileName: string;
begin
  FileName := 'C:\MonFichier.xls'; // fichier que tu veux obtenir
  Ex.ActiveWorkBook.SaveAs(Filename);
end;

C'est tout simple...

Passage des paramètres utils à une fonction/procedures

4 réponses

Votre réponse