realbasic-nug.fr
[Top] [All Lists]

Probleme de touches

To: REALbasic NUG French <realbasic-nug dot fr at lists dot realsoftware dot com>
Subject: Probleme de touches
From: Antoine Crêtaux <antoine at cretaux dot fr>
Date: Mon, 13 Aug 2007 14:19:13 +0200
Delivered-to: listarchive at realsoftware dot com
Delivered-to: realbasic-nug dot fr at lists dot realsoftware dot com
References: <B11F96A0-B401-43A1-886D-C4BF1BCD2C83 at mac dot com> <0C6A6DC9-25F5-4477-B314-2CD1B61E9700 at realsoftware dot fr> <0028EF3D-03CB-46C5-95CA-6AD04A5A9BF7 at mac dot com> <F9B3DE44-54B1-4B74-90F3-4B0253B02D70 at realsoftware dot fr> <AE5A46C6-3A33-4234-B31E-D0C233837557 at mac dot com> <9E689099-11F9-4269-B1F6-F0A6C6456D34 at realsoftware dot fr> <E96BEA3A-62BC-4739-B839-F48A4C15FFD3 at mac dot com>
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.




<Prev in Thread] Current Thread [Next in Thread>