Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > it.comp.lang.visual-basic > #19121

Re: ZOrder tra famiglie di controlli

From Paperino <non_te@lo.dico.invalid>
Newsgroups it.comp.lang.visual-basic
Subject Re: ZOrder tra famiglie di controlli
Date 2017-08-01 22:50 +0200
Organization Aioe.org NNTP Server
Message-ID <olqphq$ilr$1@gioia.aioe.org> (permalink)
References <oloak8$cdk$1@solani.org> <olobp3$mm2$1@gioia.aioe.org> <olp6rp$qqm$1@solani.org> <olq94m$1l9e$1@gioia.aioe.org> <olqaml$htp$1@solani.org>

Show all headers | View raw


Greg ha scritto:
> Paperino ha scritto:
>> Chi ti obbliga a usare le api per scrivere su una picturebox?
> Uhm....Il fatto che non esponga la proprietà text o caption?
> Ci sarebbe per caso altro?

Picture1.Print "Ciao :-)"


Per essere più completi, prendi il test della Region di ieri
e sostitisci le ultime due righe, dopo la definizione dei Point,
con queste qui:

hRegion = CreatePolygonRgn(Punti(1), NumeroPunti, ALTERNATE)

' Cambiamo la forma della PictureBox alla nuova forma definita
' come Region, ma stavolta prima ci scriviamo dentro.
     With Freccia
         .ScaleMode = vbPixels
         .AutoRedraw = True
         .CurrentX = 30
         .CurrentY = 85
         .Font.Name = "Arial"
         .Font.Bold = True
         .Font.Italic = True
         .ForeColor = vbRed
         .Font.Size = 10

         ' lungo da spiegare perché, ma non poi mettere .Print
         ' dentro il With come il resto. Il motivo comunque
         ' è lo stesso per cui non compare nell'Intellisense;
         ' fondamentalmente perché è un comando, non una proprietà
         ' specifica della PictureBox
         Freccia.Print "Il FSM ";
         .ForeColor = vbGreen
         Freccia.Print "è ";
         .ForeColor = RGB(230, 180, 0)
         Freccia.Print "GRANDE!"
         .ForeColor = vbBlack
         .CurrentX = 30
         .Font.Size = 6
         Freccia.Print "E Paperino è il suo profeta."
     End With

  SetWindowRgn Freccia.hWnd, hRegion, True

' *******************************


Bye, G.

Back to it.comp.lang.visual-basic | Previous | NextPrevious in thread | Next in thread | Find similar


Thread

ZOrder tra famiglie di controlli Greg <greg@alicie.com> - 2017-08-01 00:23 +0200
  Re: ZOrder tra famiglie di controlli Paperino <non_te@lo.dico.invalid> - 2017-08-01 00:42 +0200
    Re: ZOrder tra famiglie di controlli Paperino <non_te@lo.dico.invalid> - 2017-08-01 00:50 +0200
    Re: ZOrder tra famiglie di controlli Greg <greg@alicie.com> - 2017-08-01 08:24 +0200
      Re: ZOrder tra famiglie di controlli Luca D <antaniserse@yahoo.it> - 2017-08-01 01:09 -0700
        Re: ZOrder tra famiglie di controlli Greg <greg@alicie.com> - 2017-08-01 13:21 +0200
      Re: ZOrder tra famiglie di controlli Paperino <non_te@lo.dico.invalid> - 2017-08-01 18:12 +0200
        Re: ZOrder tra famiglie di controlli Greg <greg@alicie.com> - 2017-08-01 18:36 +0200
          Re: ZOrder tra famiglie di controlli Franz_aRTiglio <franzgol@N0SPAMtin.it> - 2017-08-01 22:09 +0200
          Re: ZOrder tra famiglie di controlli Paperino <non_te@lo.dico.invalid> - 2017-08-01 22:50 +0200
            Re: ZOrder tra famiglie di controlli Greg <greg@alicie.com> - 2017-08-02 00:16 +0200
              Re: ZOrder tra famiglie di controlli Paperino <non_te@lo.dico.invalid> - 2017-08-02 15:19 +0200
                Re: ZOrder tra famiglie di controlli Franz_aRTiglio <franzgol@N0SPAMtin.it> - 2017-08-02 15:36 +0200
                Re: ZOrder tra famiglie di controlli Greg <greg@alicie.com> - 2017-08-02 17:39 +0200

csiph-web