kod hakkında yardım

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
fiko19
Üye
Mesajlar: 73
Kayıt: 07 Oca 2009 11:39

kod hakkında yardım

Mesaj gönderen fiko19 »

procedure Tfrm_kayit.Button1Click(Sender: TObject);
begin
Image1.picture.SaveToFile ( '.\UyeResim\'edt_tc.text+'.jpg' );
end;


mrb arkadaslar .. üye kayıt sayfası yapıyorum ve üyeden aldığım resmi uyeresim klasörüne kaydetmek istiyorum üyenin tc kimlik numarası isim olacak ve .jpg uzantısı olacak.. yeni bir pencere açılmasını istemiyorum basarbasmaz otomatik kayıt lazım

yardımınızı bekliyorum şimdiden teşekkür ederim
Kullanıcı avatarı
unicorn64
Üye
Mesajlar: 919
Kayıt: 04 Nis 2006 08:56
Konum: yine yeniden Ankara ^_^

Re: kod hakkında yardım

Mesaj gönderen unicorn64 »

fiko19 yazdı:. yeni bir pencere açılmasını istemiyorum basarbasmaz otomatik kayıt lazım
yeni pencere nerede ve neden açılıoyo. neye basınca otomatik kaydetmesi lazım, neden kaydetmiyo. daha açık olursanız daha kolay yardım alırsınız...
bazen yükselmek için önce dibi görmek gerekir...

forumda soru sormadan önce bakılmalı bence
daha fazlası için...

yürümeyi öğrenmeden koşmaya çalışanlar için, tökezleyip düşmek kaçınılmazdır...

Resim
fiko19
Üye
Mesajlar: 73
Kayıt: 07 Oca 2009 11:39

Re: kod hakkında yardım

Mesaj gönderen fiko19 »

sorun şu

kullanıcı kayıt için bir form tasarlıyorum ve image1 üzerinden o üyenin resmini görüntüleyeceğim fakat image1 e daha önce sistemden aldığım resmi , butona basınca karsıma herhangi bir pencere gelmeden o üyenin tc kimlik numarası, resimin ismi olacak şekilde UyeResim klasorune kaydetmek istiyorum
khanco
Üye
Mesajlar: 226
Kayıt: 01 Eki 2007 04:39
Konum: İzmir
İletişim:

Re: kod hakkında yardım

Mesaj gönderen khanco »

Image1.picture.SaveToFile ( '.\UyeResim\' + edt_tc.text +'.jpg' );
şeklinde denermisin.
yine olmazsa resim adını tam yol olarak bir değişkene yükleyin .
fiko19
Üye
Mesajlar: 73
Kayıt: 07 Oca 2009 11:39

Re: kod hakkında yardım

Mesaj gönderen fiko19 »

malesef sorun çözülmedi
Kullanıcı avatarı
unicorn64
Üye
Mesajlar: 919
Kayıt: 04 Nis 2006 08:56
Konum: yine yeniden Ankara ^_^

Re: kod hakkında yardım

Mesaj gönderen unicorn64 »

aldığınız hata nedir yada olmayan ne? en azından resim kaydetmeyle ilgili kodunuzu buraya kopyalarsanız yardımcı olmaya çalışırız...
bazen yükselmek için önce dibi görmek gerekir...

forumda soru sormadan önce bakılmalı bence
daha fazlası için...

yürümeyi öğrenmeden koşmaya çalışanlar için, tökezleyip düşmek kaçınılmazdır...

Resim
fiko19
Üye
Mesajlar: 73
Kayıt: 07 Oca 2009 11:39

Re: kod hakkında yardım

Mesaj gönderen fiko19 »

unicorn64 yazdı:aldığınız hata nedir yada olmayan ne? en azından resim kaydetmeyle ilgili kodunuzu buraya kopyalarsanız yardımcı olmaya çalışırız...


arkadasım en üstte yazdımya kodu zaten

procedure Tfrm_kayit.Button1Click(Sender: TObject);
begin
Image1.picture.SaveToFile ( '.\UyeResim\'edt_tc.text+'.jpg' );
end;
khanco
Üye
Mesajlar: 226
Kayıt: 01 Eki 2007 04:39
Konum: İzmir
İletişim:

Re: kod hakkında yardım

Mesaj gönderen khanco »

Kod: Tümünü seç

procedure Tfrm_kayit.Button1Click(Sender: TObject);

var
fn: string;
begin

fn:=ExtractFilePath(Application.ExeName) ;
fn:=fn+'UyeResim\'+edt_tc.text+'.jpg';
Image1.Picture.SaveToFile(fn);
end;
kodlarını bu şekilde değiştir.
fiko19
Üye
Mesajlar: 73
Kayıt: 07 Oca 2009 11:39

Re: kod hakkında yardım

Mesaj gönderen fiko19 »

khanco yazdı:

Kod: Tümünü seç

procedure Tfrm_kayit.Button1Click(Sender: TObject);

var
fn: string;
begin

fn:=ExtractFilePath(Application.ExeName) ;
fn:=fn+'UyeResim\'+edt_tc.text+'.jpg';
Image1.Picture.SaveToFile(fn);
end;
kodlarını bu şekilde değiştir.

yardımlarınız için teşekkür ederim bu kez oldu elinize sağlık
Cevapla