Newsgroup: it.comp.lang.visual-basic
Titolo: Tooltip Multilinea.

Ragazzi, sono disperato, non riesco a trovare il componente OCX del "Tooltip
Multilinea".
Ho provato le "FastLib" ma, non essendo registrate, scadono e sono
inutilizzabili.
Qualcuno mi puņ soccorrere mandandomi il componente o dicendomi dove
trovarlo?
N.B.: Sarebbe molto bello se l'OCX possedesse anche la proprietą "Balloon".

 N.B.: Sarebbe molto bello se l'OCX possedesse anche la proprietà
"Balloon".
Questa manca...
Ciao
-- 
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

"L'incognito" <Assolu...@NoSpam.it> ha scritto

perche' un ocx ?
http://www.sundaysw.com/tmp/tooltip.jpg
un form che si ridimensiona su una label autoresize
qui dalla matrice va a leggere il tip da un piccolo mdb, addirittura con
find (e' il primo db che ho fatto...).
e si muove in tempo reale rispetto al mouse...
ciao, j.

 
http://www.sundaysw.com/tmp/tooltip.jpg
ehilà... riattivata la sezione software?
--
Salutoni
Sergio

 ehilà... riattivata la sezione software?
si' :)
gli iching purtroppo non li posso mettere fuori. il codice fa schifo, e' fra
i miei primi (*), ma il programma era carino:
http://www.sundaysw.com/tmp/iching.jpg
 (ehm, 260k...)
solo che i .dib e i testi li ho presi da un librino. ho cercato senza
successo autore ed editore...
quanto al sw, pero', sto chiacchierando molto con sistemisti e ragazzi nx.
ieri e' morto il bkp server. dalla via penso passeremo a 2000.
dopo quest'altro bagno di sangue e le prevedibili 389.345 patch, pero', il
sistema di rete successivo, se ci saro' ancora io, dubito fortemente sara'
ms.
ricompileremo lo stesso il kernel ogni giorno pari ( = sp+patch ), ma almeno
useremo il sangue per scopi piu' umani.
mi dispiace per vb. mal che vada montero' dappertutto wine per far girare la
javacam (**), ovvero mi tocchera' riscriverla in java. in vb sono inet+15
righe di codice compreso il salvataggio dei jpeg, in java ci vorranno 280
classi, ma per java questo e altro :)
nb: ieri ho annunciato il tutto al dir.
non capiva la parte tecnica.
quando gli ho detto quanto dovremmo versare in media a ms ogni anno, ha
capito all'istante.
se ci pensi, e' esattamente la pubblicita' ms del 2003 server <vvvvbg>
ciao, a.
(*) solo dopo ho capito che i cicli per giocare con le immagini non si fanno
con for j = 1 to 500, o meglio, bisogna parametrizzare: for j = 1 to
inverse_cpu. le monetine yin yang dovrebbero ruotare quando si clicca sui
pulsantini smiley. su un p1/90 ruotavano. su un p4/2.2 sono assolutamente
immobili :)
(**) ah gia', te la mando.

 ha scritto nel messaggio
news:blgmdk$bvse5$1...@ID-138791.news.uni-berlin.de...


 > N.B.: Sarebbe molto bello se l'OCX possedesse anche la proprietà


 > N.B.: Sarebbe molto bello se l'OCX possedesse anche la proprietà


 Perchè se ti sei fatto una libreria mi devi troppo dire che metodo usi!
da quando mi capita di scrivere codice, raramente ho lasciato stare una
funzione uguale due volte di seguito. le lib le usavo in clipper, ma piu'
per impararle che per altro. idem in vb.
nb: i sorgenti sono tuttora datati 1997-98, quindi...
sulla matrice di command della combinatoria di trigrammi:
Private Sub Command1_MouseMove(Index As Integer, Button As Integer, Shift As
Integer, X As Single, Y As Single)
     Dim MyCriteria As String, rs As Recordset
     MyCriteria = "EsagNum = " & Command1(Index).Caption
     Set rs = DbX.OpenRecordset("Esagrammi", dbOpenDynaset)
     rs.FindFirst MyCriteria
     If rs.NoMatch Then MsgBox Command1(Index).Caption & ": Non trovato":
Exit Sub
     Dim TmpTxt, j As Integer
     For j = 3 To 7
          TmpTxt = TmpTxt & "[" & LCase(rs.Fields(j).Name) & _
          "]: " & rs.Fields(j) & vbCrLf
     Next j
     frmToolTip.lblToolTip = " Esagramma " & rs!EsagNum & _
          " -- " & rs!EsagNome & " -- " & rs!Significato & _
     vbCrLf & vbCrLf & TmpTxt
     rs.Close
    Dim TTLeft, TTTop
    Dim Pnt As PointAPI
    GetCursorPos Pnt
    TTLeft = (Pnt.X + 5) * Screen.TwipsPerPixelX
    TTTop = (Pnt.Y + 5) * Screen.TwipsPerPixelY
    frmToolTip.Left = TTLeft
    frmToolTip.Top = TTTop
    frmToolTip.Visible = True
End Sub
tutto il codice del frmTooltip:
Private Sub lblToolTip_Change()
    lblToolTip.Width = 2000
    If Len(lblToolTip) < 50 Then
        lblToolTip.Width = 1000
    ElseIf Len(lblToolTip) >= 50 Then
        lblToolTip.Width = 4000
    ElseIf Len(lblToolTip) > 500 Then
        lblToolTip.Width = 5000
    ElseIf Len(lblToolTip) > 1000 Then
        lblToolTip.Width = 6000
    End If
    Width = lblToolTip.Width
    Height = lblToolTip.Height
End Sub
-- 
ciao, j.
http://www.sundaysw.com/google.gif

 wrote in message
news:blhi53$cabrc$1...@ID-51318.news.uni-berlin.de...


 ha scritto


 ha scritto nel messaggio
news:blgmdk$bvse5$1...@ID-138791.news.uni-berlin.de...


 Puoi cortesemente rispondere al messaggio che ti ho inviato privatamente?
[SNIP]
Volentieri... solo che , ad ora, non mi e' arrivato nessun messaggio!
Devi usare l'indirizzo in firma, quello nell'intestazione del messaggio e'
"criptato"; per inciso, se mi chiedevi di qualche problema strano con il
CoolTip ti anticipo che ci ho solo giocherellato un po', ma non lo uso
ancora in produzioni "serie"


 ha scritto nel messaggio
news:blja8t$cvifs$1...@ID-138791.news.uni-berlin.de...
