Comment passer un objet en arguments a uen procedure dans une dllRésolu

Question

Bonjour a tous,
alors voila tout est dans le titre, si quelqun pourrait me donner un exemple ce serait sympa, parceque je cherche mais j'y arrive pas

merci

jmp77 · Accepted Answer

Ok alors j'ai bien réfléchi a ton problème :

Ce que tu voudrais c'est passer une fichier TForm et bien perso je ne vois pas ou est le souci ca doit fonctionner. Mais une fiche tfrom est une fiche seule sans bouton sans rien. Ce que tu veux surement passer c'est une fiche que tu as crée avec des boutons et des procédures et fonctions j'imagine autrement dit un dérivé de la classe TForm comme l'exemple ci dessous non ???:
Dans cet exemple TForm1 est un descendant de TForm mais n'est plus un TForm. Et la effectivement pour passer ce composant la (TForm1) je vois mal la chose.

Est ce que j'ai bien saisie ton souci? 

Sinon après pourrais tu m'expliquer pourquoi tu tiens absolument a passer ta form a une dll ? Peut etre qu'en parlant on pourra trouver une autre solution.

Bonne prog,
JMP77.

N'oubliez pas de cliquer sur réponse acceptée.

TForm1 = class(TForm)
    ButOpen: TButton;
    StringGrid1: TStringGrid;
    GroupBoxSepar: TGroupBox;
    CheckBoxTab: TCheckBox;
    CheckBoxSpace: TCheckBox;
    CheckBoxPtComma: TCheckBox;
    CheckBoxOther: TCheckBox;
    CheckBoxComma: TCheckBox;
    EditOther: TEdit;
    CheckBoxAutosize: TCheckBox;
    LabelAutosize: TLabel;
    ButAbout: TButton;
    procedure ButOpenClick(Sender: TObject);
    procedure CheckBoxAutosizeClick(Sender: TObject);
    procedure LabelAutosizeClick(Sender: TObject);
    procedure ButAboutClick(Sender: TObject);

  private
    { Déclarations privées }
    procedure ExtractCsvData(BoolTab,BoolPtComma,BoolComma,BoolSpace,BoolOther : Boolean;
              SeparOther : ShortString; FileName : AnsiString; var CsvExtract : TCsvExtract);
    procedure ResizeColumns(StrGrd : TStringGrid);

  public
    { Déclarations publiques }
  end;

jmp77 · Answer

Tous depend ce que tu veux passer comme objet? Tu peux préciser stp...

Bonne prog,
JMP77.

jfdeterme · Answer

Bien par exemple je veux faire une dll qui rend progressivement une fiche (TForm) non transparente deja comment la créer pour que je puisse utiliser cette DLL dans autant de programmes que je veux?
Et comment l'appeller et si possible ne lui passer qu'un argument : l'objet, qui est ici la fiche??

merci

jmp77 · Answer

Ok alors juste pour voir si j'ai bien compris ton probleme : Ce que tu veux c'est que ta dll lance une fiche TForm ou bien est ce que tu veux passer a ta dll une fiche TForm?

++,
JMP.

jfdeterme · Answer

Oui :D
Donc je veux passer a ma dll une fiche TForm!!! ^^
Si tu pouvais m'aider ce serait super parceque la je vois vraiment pas comment y arriver  :dissapprove)

Comment passer un objet en arguments a uen procedure dans une dll

5 réponses

Votre réponse

Discussions similaires