Arsip: Ambil beberapa data image dari direktori...... ?

 
user image
more 15 years ago

rebeltwisted

maaf sebelumnya klo pertanyaan saya ini masih mendasar... maklum saya baru berkecimpung dg delphi.... Saya punya tugas akhir tentang neural network.... sekarang saya bingung pada proses pelatihannya... saya harus mengambil data beberapa image dari beberapa folder untuk dilatih... pertanyaanya... gmana cranya saya menampilkan isi dari folder, dan mengambil beberapa data, dan berpindah ke folder lain untuk mengambil data yang lain.... setelah semua data gambar dari beberapa folder didapat.... misalnya nanti disimpan dalam setingan txt..../ array.... bru proses bisa dilakukan... mohon pencerahannya.... thx....
user image
more 15 years ago

madi


procedure TForm1.Button1Click(Sender: TObject);
var
  s,path : string;
begin
  path := tree.Path;
  s := tree.Selected.Text;
  list.Items.Add(path+s);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
  list.Items.SaveToFile('daftar.txt');
end;
user image
more 15 years ago

madi

REVISI : :D

procedure TForm1.Button1Click(Sender: TObject);
var
  s,path : string;
begin
  path := tree.Path;
  list.Items.Add(path);
end;
user image
more 15 years ago

rebeltwisted

thanks bozzz atas infonya.... dcoba dulu
user image
more 15 years ago

rebeltwisted

bozz thanks atas sarannya... aq punya pertanyaan lagi nih... (maaf ngrepotin).... aq mau ngambil data image tipe blob dari database..... (ukuran gambarnya sekitar 80x70 pixels),... trus aq mau nampilin gambar tersebut d list box... seperti pada pertnyaan pertama... user bisa milih data gambar dari database tersebut........ gmana ya cranya... mohon bantuannya.....
user image
more 15 years ago

madi

klo blob ya gunakan on efennya dbgrid

procedure TFMain.DBGRIDCellClick(Column: TbsColumn);
begin
  listbox1.Items.Add('nama blob')
end;
:D
user image
more 15 years ago

rebeltwisted

thanks ya bos made.... dicoba dulu....
more ...
  • Pages:
  • 1
Share to
Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com