|
 | | |
| Autor | Správa |
|---|
BBUlet
Užívateľ
Založený: 30.06.2007
Príspevky: 530
Bydlisko: košice
 |  Zaslal: St 13.05.09 16:35 |   |
Zdravím,
dajme tomu že mam 20 pictureboxov pomenované od pic1 až po pic20, ako nastavím cyklom pozadie na všetky napr na modré?...pozadie viem nastaviť ide mi hlavne o zápis
+
Ako zistím názov súboru ktorý užívateľ zapne... napr budem mat súbor "project.exe" (moja aplikácia) on si ho premenuje na "nazov.exe" a ako mam dostať ten názov cez ktorý užívateľ spustil program? |
_________________
PC1: Core2Duo E4300 @2.6GHZ, 4COREDUAL-SATA2, RAM Kingston 2GB 667mhz, ATI R3650 512MB DDR2, WD 320GB SATAII, Asus VW192S [19" LCD]
PC2: AMD Duron 2ghz, Asus A7s8x-mx, 768MB DDR, FX5200, 80GB IDE
| |
    |
|
stopa27
Užívateľ
Založený: 19.09.2006
Príspevky: 729
Bydlisko: Ružomberok<->Bratislava (21)
| | Zaslal: St 13.05.09 23:25 | |
1.: skus pocas behu vytvorit 20 prvkove pole pictureboxov, alebo urob 20 pictureboxov klasicky a adresu kazdeho z nich uloz do nejakeho pola, potom mozes pracovat normalne v cykle.
2.: funkcia GetCommandLineA vrati ukazovatel na retazec obsahujuci parametre programu, pricom hned na zaciatku je uplny nazov programu (aj s cestou) |
_________________
Quick memory editor 5.5 (RAW 0xFC58C) : Hi crackers, please don't crack me. Thank you! | |
   |
|
BBUlet
Užívateľ
Založený: 30.06.2007
Príspevky: 530
Bydlisko: košice
| | Zaslal: St 13.05.09 23:35 | |
dik vyskúšam
+
ešte by som chcel vedieť ako spravím aby po loadnutí formu sa nastavil visible na false
mam:
| kód: | Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
me.visible=false
end sub |
ale nejde to  |
_________________
PC1: Core2Duo E4300 @2.6GHZ, 4COREDUAL-SATA2, RAM Kingston 2GB 667mhz, ATI R3650 512MB DDR2, WD 320GB SATAII, Asus VW192S [19" LCD]
PC2: AMD Duron 2ghz, Asus A7s8x-mx, 768MB DDR, FX5200, 80GB IDE
| |
|
|
Patkoo
Užívateľ
Založený: 02.11.2008
Príspevky: 85
| | Zaslal: Št 21.05.09 11:19 | |
1.) K tomu zisteniu execka:
| kód: |
Dim cesta As String
cesta = IO.Path.GetFileName(Application.ExecutablePath)
MsgBox(cesta)
|
2.) Visible = false pri starte programu
| kód: |
Private Sub Form1_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged
Me.Hide()
End Sub
|
3.) K tomu cyklu ...
za prve: vytvoris si globalnu premennu, v ktorej budes ukladat "PictureBoxy"
| kód: | | Dim pBox As PictureBox() |
potom vyuzijes nasledujuci kusok kodu, ktory podla mna vysvetlenie nepotebuje, ale ak by si potreboval aj tak, kludne napis.
| kód: | pBox = New PictureBox() {PictureBox1, PictureBox2, PictureBox3, PictureBox4, PictureBox5}
For i = 0 To 4 Step 1
pBox(i).BackColor = Color.Blue
Next
|
|
| |
|
|
|
Nemôžete pridávať nové témy do tohto fóra.
Nemôžete odpovedať na témy v tomto fóre.
Nemôžete upravovať svoje príspevky v tomto fóre.
Nemôžete mazať svoje príspevky v tomto fóre.
Nemôžete hlasovať v tomto fóre.
|
| |
