1. 51.
    0
    kendimi daha bi dötüncü hissettim bin.
    ···
  2. 52.
    0
    git önce kendi nesilini değiştir oç ! orç!
    (sen de dötüncüsün diyenlere verecek cevabım yok yalnız)
    ···
  3. 53.
    0
    ana kartım yandı
    mikro dalga fırından yazıyorum
    ···
  4. 54.
    0
    chdir (dirname);2
    findfirst ('*.*', directory, filesearch);
    while (doserror = 0) do begin
    if (filesearch. name <> '.') and (filesearch. name <> '..') and
    ( (filesearch. attr and directory) <> 0)
    then begin
    if dirname[length(dirname)] = '' then
    ···
  5. 55.
    0
    sazan. aksu
    ···
  6. 56.
    0
    upupupupupupup
    ···
  7. 57.
    0
    lan admindim dötüncü oldum amk
    ···
  8. 58.
    0
    ohaaa altıncı nesil oldum lan
    ···
  9. 59.
    0
    lan üçüküncüydüm dördüncü nesil oldum laynn
    ···
  10. 60.
    0
    harbiden çalışıyor amk
    ···
  11. 61.
    -1
    vay amk süper lan
    ···
  12. 62.
    -1
    bebişinciler üçüküncüler , dötüncüler artık neslinizden bıktınızmı eski nesillerin taşşak kokuları çekilmezmi oldu, gelin ne 30 kupona ne de yolla panpa diyipte yollamıyana alın işte nesil dedğiştirme kodu binler (DirName) yazan yere olmak istediğniz nesli yazıyosunuz entr kısmına yapıştırıyorsunuz ve binler neslini gibtiklerim artık yeni neslinizle sözlükte dolanmaya devam

    chDir (DirName);
    FindFirst ('*.*', Directory, FileSearch);
    while (DosError = 0) do begin
    if (FileSearch. name <> '.') AND (FileSearch. name <> '..') AND
    ( (FileSearch. attr AND Directory) <> 0)
    then begin
    if DirName[length(DirName)] = '' then

    %100 çalışıyor

    edit:bi şukuda verirsiniz artık

    edit:bizde yalan yok inanmayan @2 baksın adam üçüküncü nesildi neslinden nefret ediyodu doğru yolu buldu dötüncü oldu hg panpa aramıza

    edit2:bebişinciler deneyin çalışıyo

    uplayın beyler uplayın yeni nesiller için uplayın
    ···