Keresés

Új hozzászólás Aktív témák

  • ollie
    MODERÁTOR

    Kéne egy kis segítség!

    Van egy képnézegető progim. Társítva vannak hozzá a jpg formátumú képek. Tehát ha megnyitok egy képet ezzel a progivan indul. Ez müxik.
    A progi ablaka alján van egy Drive egy Paht egy File list. Amikor futtatom a progit itt tudom keresni a képeket és megnyitni. Azt szeretném hogy amikor képet nyitok meg (kep = command ; kepmegj.Picture = LoadPicture(kep) - érted.) akkor a Drive, Path és File elemen a kép útvanala legyen.
    Pl.: A kép útvaonala ''e:\kepek\vegyes\uj.jpg''. A Drive1.Drive legyen ''e'', a Path1.path legyen ''e:\kepek\vegyes'', és a File1.path is ugyan így.
    Nos ezt hogy lehetne megoldani? Nagyon fontos lenne!

    Előre is köszi! :R

    [Szerkesztve]

    Használd az inStr és az inStrRev kereső funkciókat

    pl: mid (filename, inStrRev(cstr(filename),''\'')+1, 255)

    ha a filename =''e:\kepek\vegyes\uj.jpg''
    akkor a végeredmény uj.jpg lesz

    A meghajtó betűjelét nagyon egyszerű megállapítani (ugye csak az első karaktere a filenévnek), a maradékot meg e kettő levágásából kapod.


    Egyébként ez VBScript, de gondolom VB-ben is ugyanígy kell használni.

    [Szerkesztve]

  • [HUN]Zolee
    őstag

    Kéne egy kis segítség!

    Van egy képnézegető progim. Társítva vannak hozzá a jpg formátumú képek. Tehát ha megnyitok egy képet ezzel a progivan indul. Ez müxik.
    A progi ablaka alján van egy Drive egy Paht egy File list. Amikor futtatom a progit itt tudom keresni a képeket és megnyitni. Azt szeretném hogy amikor képet nyitok meg (kep = command ; kepmegj.Picture = LoadPicture(kep) - érted.) akkor a Drive, Path és File elemen a kép útvanala legyen.
    Pl.: A kép útvaonala ''e:\kepek\vegyes\uj.jpg''. A Drive1.Drive legyen ''e'', a Path1.path legyen ''e:\kepek\vegyes'', és a File1.path is ugyan így.
    Nos ezt hogy lehetne megoldani? Nagyon fontos lenne!

    Előre is köszi! :R

    [Szerkesztve]

    Hy.Ha szépen megkérlek, átküldenéd nekem a programodat? szeretnék belőle tanulni egy kicsit.e-mail címemre jöhet. köszi :R

Új hozzászólás Aktív témák