× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Autres langages
 DELPHI : appel de procédure [résolu]
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Bleys
  Posté le 11/12/2003 @ 22:06 
Aller en bas de la page 
Astucien
Salut all, voila je voudrais que quand on appuie sur une touche, la touche soit identifié (jusque la pas de problème) et que en fonction de la valeur de cette touche cela m'appel une PROCEDURE déjà existante. Comment faire ? petit code pour plus de clarté : [code] procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key=char(43) then ?????????????????????? end;[/code] Merci ++[hello]

Modifié par Bleys le 12/12/2003 15:27
Publicité
baptiste
 Posté le 12/12/2003 à 08:30 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

bonjour, ça fait longtemps que je n'ai pas fait de delphi, mais essaye "call nom_de_la_procédure()"
Bleys
 Posté le 12/12/2003 à 14:45 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien
Je vais tester, je te tiens au courant Merci ++[hello]
Bleys
 Posté le 12/12/2003 à 15:02 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien
Salut, non c'était pas sa : la solution : [code]procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key=char(43) then addiclick(nil); end;[/code] voila ++[hello]
edon47
 Posté le 12/12/2003 à 15:02 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
Salut, Ajoute simplement le nom de ta procédure après then: [code]procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key=char(43) then MaProcedure; end;[/code]
Bleys
 Posté le 12/12/2003 à 15:26 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien
> edon éh non sa peut pas marcher comme sa pke la procédure que j'appel à comme paramètre : [code](sender : tobject)[/code] donc obliger de mettre quelque chose Merci a vous quand meme ++[hello]
edon47
 Posté le 13/12/2003 à 06:25 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
addiclick(nil); ??? C'est quoi?
Bleys
 Posté le 13/12/2003 à 11:22 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien
salut, addiclick est le nom de la procedure (qui correspond en fait à l'appui sur un bouton) et le nil pour ne renvoyer aucun paramètre (parceque la procedure addiclick a comme paramètre "(sender : TObject)"). Voila ++[hello]
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
29,68 €Carte mémoire SDXC UHS-I U3 SanDisk Extreme Plus 128 Go (jusqu'à 170 Mo/s) à 29,68 € livrée
Valable jusqu'au 29 Mai

Amazon Allemagne fait une promotion sur la carte mémoire SDXC UHS-I U3 SanDisk Extreme Plus d'une capacité de 128 Go qui passe à 25,16 €. Comptez 4,52 € pour la livraison en France soit un total de 29,68 € livrée alors qu'on trouve la carte ailleurs à partir de 60 €. Cette carte mémoire offre des vitesses jusqu'à 170 Mo/s en lecture et 90 Mo/s en écriture et intègre des mécanismes afin de gérer l'usure des cellules de la carte et augmenter ainsi sa durée de vie. Une valeur sûre pour les plus exigeants. Elle résiste aux températures extrêmes, à l'eau, aux chocs et aux rayons X. La carte est fournie avec le logiciel de récupération de données RescuePRO Deluxe qui facilite la récupération des fichiers qui ont été effacés accidentellement.

Vous pouvez utiliser votre compte Amazon France sur Amazon Allemagne. Il n'y a pas de douane.


> Voir l'offre
24,99 €Fire TV Stick Basic Edition à 24,99 €
Valable jusqu'au 27 Mai

Amazon fait une promotion sur la nouvelle version de sa clé HDMI Fire TV Stick Basic Edition qu'il propose à 24,99 € au lieu de 39,99 €. Cette clé HDMI à brancher sur votre TV possède un processeur quadricoeur, 1 Go de RAM et 8 Go d'espace de stockage, le WiFi et le bluetooth. Une télécommande est fournie. Avec elle, vous allez pouvoir voir facilement Prime Video, Netflix, Disney+, YouTube, Spotify sur votre TV Full HD. Cette nouvelle version est désormais compatible Alexa et possède une télécommande améliorée (avec plus de boutons de contrôle).


> Voir l'offre
247,95 €NAS Netgear ReadyNAS 212 2 baies à 247,95 €
Valable jusqu'au 02 Juillet

LDLC propose actuellement le NAS Netgear ReadyNAS 212 qui passe à 247,95 € alors qu'on le trouve ailleurs à 349 €. Ce NAS dispose de 2 baies où vous pourrez donc mettre jusqu'à 2 disques durs SATA. Ce NAS vous permettra de centraliser vos sauvegardes et vos données entre vos ordinateurs et vos périphériques mutimédia. Il est équipé d'un processeur ARM Cortex A15 avec quatre cœurs à 1,4 GHz et 2 Go de mémoire vive et offre des vitesses jusqu'à 200 Mo/s. Il permet le transcodage 1080p en temps réel et est compatible Plex. Il intègre 5 niveaux de protection pour vos données : RAID, snapshot pour la restauration de fichiers, antivirus en temps réel, protection contre la dégradation du matériel et sauvegardes gratuites dans le cloud.


> Voir l'offre

Sujets relatifs
telecharger delphi ?? **résolu**
créer fichier .gdb avec delphi
ListBox delphi
choisir un langage C++,c#,vb,java,delphi
problème d'appel à paint pour Tetravex!
procedure maple 9.5
Recherche Développeur DELPHI (Bretagne)
Delphi+Oracle
livre delphi
relancer une procedure en vb6
Plus de sujets relatifs à DELPHI : appel de procédure [résolu]
 > Tous les forums > Forum Autres langages