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

• #2003 Calogero addikt Fire/SOUL/CD #2002

  Új Válasz 2014-12-29 14:30:26 #2003

  Ú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

  

  Calogero

  addikt

  válasz Fire/SOUL/CD #2002 üzenetére

  Neked is köszönöm, gyorsan el is mentettem.
  Mindig tanul valami újat az ember

• #2001 Calogero addikt bucsupeti #2000

  Új Válasz 2014-12-28 20:15:19 #2001

  Ú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

  

  Calogero

  addikt

  válasz bucsupeti #2000 üzenetére

  Köszönöm a CopyFile az jó ötlet volt, eltudtam indulni valahonnan.
  De sajnos egyszerre csak 1 file-t tud másolni, a *.txt nem működött, de így sikerült megoldani.

  Tettem a Formra egy Filelistbox-ot.

  Filelistbox.Visible:=False;
  Filelistbox.Directory:=ExtractFilePath(Application.ExeName)+'Adatok\';
  Filelistbox.Mask := '*.db';
  If Filelistbox.items.count > 0 then
  For i := 0 to Filelistbox.items.count-1 do
  Copyfile(pchar(Filelistbox.Directory +'\'+ Filelistbox.Items[i]), pchar(ExtractFilePath(Application.ExeName)+'Backup\'+ Filelistbox.Items[i]), false);

  Majd a Maszkot átállítottam *.txt-re, és átmásoltam azokat a file-okat is.

• #1999 Calogero addikt

  Új Válasz 2014-12-28 17:30:43 #1999

  Ú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

  

  Calogero

  addikt

  Sziasztok

  Van nekem egy A könyvtárba txt és db kiterjesztésű file-k.
  Ezeket szeretném a program kilépésekor átmásolni egy B könyvtárba, és ha már ebben a könyvtárban létezik olyan nevű file, akkor azokat felül írja.

  Előre is köszönöm.

• #1989 Calogero addikt Calogero #1988

  Új Válasz 2014-07-14 17:00:14 #1989

  Ú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

  

  Calogero

  addikt

  válasz Calogero #1988 üzenetére

  Sikerült megoldanom.

• #1988 Calogero addikt

  Új Válasz 2014-07-14 15:04:34 #1988

  Ú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

  

  Calogero

  addikt

  Sziasztok!

  Van 1db MaskEdit-em amelynek ez lenne a maszkja : 99999999-9-99;1;
  Azt hogy tudom megoldani, hogy amíg nincs kitöltve a helyesen addig ne lehessen tovább lépni, illetve jelenjen meg egy üzenet hogy az adószám nincs jól kitöltve?

  Előre is köszönöm.

• #1303 Calogero addikt btotyi #1295

  Új Válasz 2006-10-31 14:07:44 #1303

  Ú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

  

  Calogero

  addikt

  válasz btotyi #1295 üzenetére

  Nagyon szépen köszönöm

• #1291 Calogero addikt

  Új Válasz 2006-10-14 15:45:50 #1291

  Ú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

  

  Calogero

  addikt

  Van egy paradox táblám Tqueryt használom lekérdezéshez. (Select * From Filmek Order By Cim)
  
  Hogy tudom azt beállítani hogy Ékezettel betűkkel kezdődő filmek nem a lista végéré kerüljenek. ( Á- val kezdődő filemek ne a V betűsök után jöjjön)
  

• #788 Calogero addikt Diskcopy #786

  Új Válasz 2005-04-27 17:13:49 #788

  Ú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

  

  Calogero

  addikt

  válasz Diskcopy #786 üzenetére

  Koszi szepen ez a modszert tenleg mukodik.

• #785 Calogero addikt Calogero #784

  Új Válasz 2005-04-25 21:18:04 #785

  Ú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

  

  Calogero

  addikt

  válasz Calogero #784 üzenetére

  UP

• #784 Calogero addikt

  Új Válasz 2005-04-25 14:22:47 #784

  Ú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

  

  Calogero

  addikt

   

  Procedure TFelviteForm.BitBtnBoritoClick(Sender: TObject);
  Begin
    ImageBorito.Picture.Bitmap.FreeImage;
    OpenPictureDialog.InitialDir:=ExtractFilePath(Application.ExeName)+'Boritok';
    If OpenPictureDialog.Execute Then
       Begin
         ImageBorito.Picture.LoadFromFile(OpenPictureDialog.FileName);
         VanKep:=True;
       End;
  End;

  
  
  OpenPictureDialog-al szeretnek betolteni egy kepet, ami sikerul is azzal nincs gond.
  A gond InitialDir-el van. Az elso klikknel meg tokeletesen mukodik, de ha a kepet egy masik konytvtarbol toltom be. akkor a kovetkezo klikknel mar nem veszi figyelembe az InitialDir-ben megadott erteket, hanem megjegyzi hogy honnan lett kijelove az elozo kep. Ha a programbol kilepek es ujra inditom akkor ismet jol mukodik az elso klikkig.
  
  

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