J'avoue que je ne comprends pas. J'ai deux projets. Dans la fenetre
principale des deux je me place dans le keydown
pour l'un je fais
Dim i as integer
For i = 0 to Laliste.ListCount-1
If left(laliste.cell(i,1),1) = key then
Laliste.ListIndex = i
Laliste.ScrollPosition = i
exit
End if
Next
return true
ce qui me permet de faire la sélection dans la liste
Pour le second je fais
if (key = "V" or key ="v") then
if clip.picture <> nil then
Cimage.backdrop = clip.picture
End if
End if
Ce qui me permet de coller l'image du presse papier dans un canvas.
Tout cela fonctionne normalement sauf que pour le premier projet
tout se passe bien alors que cela ne fonctionne sur le deuxieme
uniquement si je fais la touche "Pomme" en meme temps...
Je ne comprend pas pourquoi je suis obligé de faire cela. Il y a t il
quelque part une propriété qui gère cela?
From 13 Aug 2007 14:15:12 +0200
Return-Path: <realbasic-nug dot fr-bounces at lists dot realsoftware dot com>
X-Original-To: listarchive at realsoftware dot com
Delivered-To: listarchive at realsoftware dot com
Received: by xmail.realsoftware.com (Postfix, from userid 1037)
id 812EB3B6ECBA; Mon, 13 Aug 2007 05:19:34 -0700 (PDT)
X-Spam-Checker-Version: SpamAssassin 3.1.1 (2006-03-10) on
www.realsoftware.com
X-Spam-Level:
X-Spam-Status: No, score=-1.6 required=4.5 testsºYES_00,NO_REAL_NAME,
SUBJECT_EXCESS_QP autolearn=no version=3.1.1
Received: from lists.realsoftware.com (m.realsoftware.com [66.116.103.65])
by xmail.realsoftware.com (Postfix) with ESMTP id 3A1123B6ECA7;
Mon, 13 Aug 2007 05:19:30 -0700 (PDT)
Received: from real-software-mini.local (localhost [127.0.0.1])
by lists.realsoftware.com (Postfix) with ESMTP id 9AC8254C966;
Mon, 13 Aug 2007 07:19:20 -0500 (CDT)
X-Original-To: realbasic-nug dot fr at lists dot realsoftware dot com
Delivered-To: realbasic-nug dot fr at lists dot realsoftware dot com
Received: from ns2499.ovh.net (ns2499.ovh.net [213.186.35.120])
by lists.realsoftware.com (Postfix) with ESMTP id 99B0854C95A
for <realbasic-nug dot fr at lists dot realsoftware dot com>;
Mon, 13 Aug 2007 07:19:16 -0500 (CDT)
Received: (qmail 582 invoked by uid 0); 13 Aug 2007 14:15:12 +0200
Date: 13 Aug 2007 14:15:12 +0200
Message-ID: <20070813121512 dot 31969 dot qmail at ns2499 dot ovh dot net>
From: michel dot boutin at expertpresse dot fr
To: realbasic-nug dot fr at lists dot realsoftware dot com
Cc:
Subject: =?utf-8?Q?Re:_Lot_realbasic-nug.fr,_Vol_20,_Parution_4?Content-Type: text/plain;
charset="UTF-8"
Content-Transfer-Encoding: 8bit
Content-Disposition: inline
X-BeenThere: realbasic-nug dot fr at lists dot realsoftware dot com
X-Mailman-Version: 2.1.9
Precedence: list
Reply-To: REALbasic NUG French <realbasic-nug dot fr at lists dot realsoftware dot
com>
Sender: realbasic-nug dot fr-bounces at lists dot realsoftware dot com
Errors-To: realbasic-nug dot fr-bounces at lists dot realsoftware dot com
Votre message a été réceptionné ; je suis absent jusqu'au 29/08/2007.
|