(VB6.0)Disegno di archi

[juniors]

Ciao a tutti
ho un problema nel disegnare archi
nel codice che uso è semplice(forse troppo)
Picture1.Circle (x,y),raggio,colore,inizio,fine,aspetto
dov'è il problema? praticamente il problema è che l'arco creato consiste nel
disegno di una fetta di torta che parte dalla coordinata PSet(x,y),cosa che
non riesco a fare o a capire come fare è eliminare le due line che
si congiungono al centro e che rimanga solo l'arco.
Grazie mille

[chipdb]

Io si solito usavo l'api di windows:

Private Declare Function Arc Lib "gdi32" (ByVal hdc As Long, _
                                          ByVal xInizioRettangolo As Long, _
                                          ByVal yInizioRettangolo As Long, _
                                          ByVal xFineRettangolo As Long, _
                                          ByVal yFineRettangolo As Long, _
                                          ByVal xInizioArco As Long, _
                                          ByVal yInizioArco As Long, _
                                          ByVal xFineArco As Long, _
                                          ByVal yFineArco As Long) As Long

Private Sub Form_Paint()
    Arc Me.hdc, 0, 0, 100, 100, 50, 100, 100, 50
End Sub

[juniors]

Grazie per la gentile risposta ma non riesco bene a capire
Non ho mai adoperato una libreria gdi ed sul programma non mi succede
niente neanche errori niente.
Il risultato di Me.hdc è un numero enorme.........
Mi faresti una grande cortesia mi metteresti dei commenti che possa capire!
Grazzie mille e tanti auguri di buon anno

[chipdb]

Sì scusa, ho sbagliato l'evento (troppo abituato a .net!!) e in più devi settare anche l'autoredraw altrimenti non vedi nulla...

Private Declare Function Arc Lib "gdi32" (ByVal hdc As Long, _
                                          ByVal xInizioRettangolo As Long, _
                                          ByVal yInizioRettangolo As Long, _
                                          ByVal xFineRettangolo As Long, _
                                          ByVal yFineRettangolo As Long, _
                                          ByVal xInizioArco As Long, _
                                          ByVal yInizioArco As Long, _
                                          ByVal xFineArco As Long, _
                                          ByVal yFineArco As Long) As Long

Private Sub Form_Load()
    AutoRedraw = True
    Arc Me.hdc, 0, 0, 100, 100, 50, 100, 100, 50
End Sub

Ciao buon anno anche a te!

[icecube_HT]

Originariamente inviato da juniors
Ciao a tutti
ho un problema nel disegnare archi
nel codice che uso è semplice(forse troppo)
Picture1.Circle (x,y),raggio,colore,inizio,fine,aspetto
dov'è il problema? praticamente il problema è che l'arco creato consiste nel
disegno di una fetta di torta che parte dalla coordinata PSet(x,y),cosa che
non riesco a fare o a capire come fare è eliminare le due line che
si congiungono al centro e che rimanga solo l'arco.
Grazie mille

Ciao !
Prova a scrivere QUALI parametri usi per la riga evidenziata, senno' come facciamo ad aiutarti ?!!

Per quello che ricordo, se gli angoli inizio e fine sono NEGATIVI, viene eseguita la congiunzione col centro, se sono positivi, no (e' quello che vuoi fare, SE ho capito bene !)



P.S.: Buon Anno !!!!

[juniors]

Hai proprio ragione!!!!!!
GRAZIEEE!!!!!!!!!