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

• #913 Attila1981 csendes tag

  Új Válasz 2005-09-28 10:49:19 #913

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Attila1981

  csendes tag

  Megpróbálom összefoglalni:
  
  Van egy szovegszerkeszto ablakom, és ha itt elmentem az irást txtként (csak txt-t adtam meg), egy másik könyvtárba (tehát nem abba a könyvtárba ahol az egész programom és reszei vannak) akkor , ha kilépek a szovegszerkeszto ablakból lefagy mert nem találja a gombokon levő képeket, háttérképeket stb.
  De ha ugyanabba a mappába mentem el a txt-t ahol a programom található akkor megy minden jól! Tehát amint elmentem máshová abban a könyvtárban keresi az adatokat. Ezt már megoldotta a képekre.
  
  public
  workingDirectory : string;
  end;
  
  procedure Talap.FormCreate(Sender: TObject);
  begin
  workingDirectory:=extractfilepath(paramstr(0));
  end;
  
  ....
  
  okgomb.LoadFromFile(alap.workingdirectory+'kepek\okgomb.bmp');
  
  Igy most már mukodnek a képek.
  
  De van egykét fájlom amit igy nyitik meg gombnyomásra:
  
  procedure TfrmdXXXXX.XXXXClick(Sender: TObject);
  begin
  ShellExecute(handle,nil, 'mappa\fajl.htm' ,nil,nil, SW_SHOWNORMAL);
  end;
  
  Ezt kellene megirnom valahogy ugy hogy a alap.workingdirectory benne legyen.
  Mert más könyvtárba való mentés után ezek még nem mennek.
  Kössz
  

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