kun painan vaikka CTRL+P niin text1.text:iin tulisi painoit ctrl ja p:tä? miten onnistuisi?
Laita ensin formin KeyPreview-ominaisuuden arvoksi True, ja kirjoita sitten:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Shift = 2 And KeyCode = vbKeyP Then
Text1.Text = "Painoit Control + P"
End If
End SubKeyDown-aliohjelmassa Shift on hieman erikoinen muuttuja, joka kuvaa samaan aikaan Shiftin, Controlin ja Altin tilaa. Jos Shift on 2, on Control painettuna.
kiitos kiitos kiitos antti! Olet tosi suloinen!
entäs kun haluan itse kohdab johon teksti tulostetaan? mitä sitten teen?
lainaus:
entäs kun haluan itse kohdab johon teksti tulostetaan?
Nyt joudut täsmentämään. Minkä kohdan?
Kun painan hiirellä tiettyä kohtaa niin siihen voin kirjoittaa (siis text1.text kohtaan)
Täh! Siis haluutkos, että textboxi liikkuu vai se kirjotus textboxissa?
'jos haluat, että textboxi liikkuu 'formin mousedown kohtaan: text1.move
lainaus:
Kun painan hiirellä tiettyä kohtaa niin siihen voin kirjoittaa (siis text1.text kohtaan)
Ah, siis kursorin kohtaan. Seuraava lisää tekstin "uus teksti" kursorin kohdalle:
Text1.Text = Left$(Text1.Text, Text1.SelStart) & "uus teksti" & Right$(Text1.Text, Len(Text1.Text) - Text1.SelStart)
Miten voin tehdä tallennuksen joka tulee samalla tavalla kuin muissakin windows ohjelmissa?
Helpointa on käyttää CommonDialog-kontrollia:
https://www.ohjelmointiputka.net/koodivinkit/
https://www.ohjelmointiputka.net/koodivinkit/
ton cd:nhän saa kanssa siitä dll:stä mutta mitkä on ne fontti ja coloori ym jutskien declaraatio nimet? voiks joku kellä on api viewer listaa ne ku mulla on tää vb5cce... kiitti.
API Guide auttaa: http://www.partware.com/ebooks/api/ref/funcc.
lainaus:
API Guide auttaa: http://www.partware.com/ebooks/api/ref/funcc.
html#commondialog
Wau! Tuolta löytyy siis tuhat muutakin hyödykästä jutskaa. Kiitokset!
Joo kiitti. Nyt mietin että miten saisin vaikka *.txt tiedoston näkymään text1.text:issä.
text1.multiline=true
open "joku_ihhmeen_tiedosto.txt" for input as #1
do until eof(1)
line input #1,a
text1.text=text1.text & a & vbcrlf
loop
close(tää oli sit ihan hatusta)
lainaus:
text1.multiline=true open "joku_ihhmeen_tiedosto.txt" for input as #1 do until eof(1) line input #1,a text1.text=text1.text & a & vbcrlf loop close(tää oli sit ihan hatusta)
tarkoitin sitä että tuolla commondialogilla.
Ei sitä tiedostoa voi avata sillä CommonDialogilla vaan sen avattavan tiedoston voi valita sen avulla. Sitten se pitää erikseen avata siihen TextBoxiin.
Katsele vähän vaikka ohjelmointiputkan koodivinkkejä, jos niistä olisi jotain apua. Esimerkiksi:
Common Dialog >
https://www.ohjelmointiputka.net/koodivinkit/
Nopea tiedostonluku rutiini > https://www.ohjelmointiputka.net/koodivinkit/
ei ole harmi kyllä apua.
commondialog1.showopen 'näytetään se dialogi text1.multiline=true if commondialog1.filename = "" then exit sub 'poistutaan jos käyttäjä painoi cancel open commondialog1.filename for input as #1 'avataan tiedosto, jonka nimi haetaan commondialogin filename -ominaisuudesta do until eof(1) 'luetaan rivi kerrallaan textboxiin line input #1,a text1.text=text1.text & a & vbcrlf loop close 'suljetaan tiedosto
hey! tuon itsekin kirjoitin... mikähän siinä oli vikana?
toivottavasti tallentaminen onnistuu... ei toimi...
lainaus:
API Guide auttaa: http://www.partware.com/ebooks/api/ref/funcc.
html#commondialog
Tääkin on tsekkaamisen arvoinen paikka:
http://www.mentalis.org/
Aihe on jo aika vanha, joten et voi enää vastata siihen.