begin process at 2010 03 22 03:05:25
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Delphi

 > 

Divers

 > 

Débutant(e)

 > 

Utiliser l'évènement d'un objet dans un autre objet


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Utiliser l'évènement d'un objet dans un autre objet

mardi 1 avril 2008 à 14:20:36 | Utiliser l'évènement d'un objet dans un autre objet

dunith

bonjour
  alors j'ai creé un objet TGestCAB qui gère la lecture de code barre, et cela on déclarant un évènement:
TOnCodeRecuEvent = procedure (Sender : TObject; NumLecteur : integer; sCAB : string) of object;
avec
 FOnCodeRecu : TOnCodeRecuEvent;
property OnCodeRecu : TOnCodeRecuEvent read FOnCodeRecu Write FOnCodeRecu;
et la procédure
procedure CodeRecu(Sender: TObject; returnPacket : string);

//: Procedure appelée lorsque un code est reçu sur le port série
procedure TGestCAB.CodeRecu(Sender: TObject; returnPacket : string);
 var
  CodeBar : String;
  numLecteur : integer;
begin
    if LeftStr(returnPacket, 2)='/*' then // message avertissement, on ignore
      exit;
    // on récupère le n° de lecteur (les 4 premiers chars)
    numLecteur := StrToInt(LeftStr(returnPacket,4));
    // on récupère le code
    CodeBar := MidStr(returnPacket, 5, Length(returnPacket)-4);
    DoCodeRecu(numLecteur, CodeBar);
end;
et dans mon objet TGestProcess
dans type j'ai déclaré:
TtrameRecue = class (TGestCAB)
TGestProcess = class (TObject)
et dans private j'ai déclaré:
MaTrameRecue : TtrameRecue;
et dans protected j'ai déclaré:
procedure TrameRecue(Sender : TObject; NumLecteur : integer; sCAB : string);

et dans implémentation-> dans constructor TGestProcess.CreateInstance j'ai déclaré:
begin
  inherited Create;
  MaTrameRecue.OnCodeRecu := TrameRecue;

mais j'ai des erreurs?

quelq'un peut si c'est comme ça qu'on utilise l'évènement de mon objet TGestCAB , dans mon objet TGestProcess?

 ( désolée, je suis débutante en delphi)
Merci
mardi 1 avril 2008 à 16:36:21 | Re : Utiliser l'évènement d'un objet dans un autre objet

dunith

Réponse acceptée !
hello

c'est encore moi,
en faite c'était facile;
vu que mon TGestCAB a une classe fonction Instance:

alors il fallait que j'appelledans (TGestProcess) mon évènement OnCodeRecu, procédure déclarée dans TGesCAB, comme suit:

TGestCAB.Instance.OnCodeRecu := OnMaTrameRecue;

et le tour est joué

Merci




Cette discussion est classée dans : objet, procedure, tobject, numlecteur, returnpacket


Répondre à ce message

Sujets en rapport avec ce message

gestion d'évènement pour lecture des codes barres [ par dunith ] Bonjour j'ai déjà posé la question à porpos des lecteurs codes barres, mais je n'ai pas eu de réponse... alors j'ai créer un objet TGestCAB qui gère l Probleme de compilation [ par armstrong0000 ] Bonsoir,J'ai un projet qui commence plus ou moins a prendre forme quand je veux executer j'obtiensl'erreur suivante:Project project1.exe raised exepti problème pour passer une image en noir et blanc [ par ender27 ] Bonjour à tous,Je suis un débutant en Delphi (je posséde la version 5).Je dois réaliser un programme de reconnaissance de caractères pour mon école.Le Choisir le dosier de sauvegarde [ par cocowz ] Bonjour,J'ai telecharge un fichier mxWebUpdate sur (http://www.maxcomponents.net/download.html#MXWEBUPDATE)J'ai compris le systeme mais la chose que j connexion client server avec socket [ par tchakadim ] salut,jé fait un prog simple d'envoie et de reception des caractères mai jé un pb c'est que l'envoi du serveur au client ne s'effectue pas alors que d afficher une ligne !!! [ par Hardouz ] salut voici un bou de Code que je vien de faire a l'aide de plusieur membres du Cs je vous remerci bien :) mais je veut faire afficher la ligne qui co Gestion d'événement [ par Oniria ] Bonjour,j'aimerais savoir comment déclarer une procedure d'événement. En effet, j'ai une unité en pascal permettant de gérer le port série. C'est un o problème affichage image [ par davibz ] Bonjour,    Je viens de débuter avec delphi et j'ai qq soucis avec ma page de chargement. J'ai une image et une progressbar dans ma fenetre chargement Inclure un graph sous delphi?? [ par bm3w325i ] Bonjours, je viens de me lancer dans delphi car j ai besoin d utiliser un media palyer pour diffuser la video par la sortie video de ma carte de decom


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,558 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales