Timage to String

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Bay_Y
Üye
Mesajlar: 116
Kayıt: 10 Mar 2014 11:12
Konum: İstanbul

Timage to String

Mesaj gönderen Bay_Y »

Resim

3 resim 1 adet popmenu var . Burda hangisinin üzerinde ise onun ismini hem image nesnesi olark hemde string olarak öğrenmek istiyorum nasıl yapabilirim.?

Teşekkürler.
Bay_Y
Üye
Mesajlar: 116
Kayıt: 10 Mar 2014 11:12
Konum: İstanbul

Re: Timage to String

Mesaj gönderen Bay_Y »

Timage(PopupMenu1.PopupComponent).Picture.Bitmap := nil ;
Timage(PopupMenu1.PopupComponent).Picture.LoadFromFile('C:\Cop\c.png');
ShowMessage('Seçilen : ' + PopupMenu1.PopupComponent.Name);

Böyle birşey ile ben işimi çözdüm başka birininde işine yarayabilir diye ekliyorum.
Herkese kolaylıklar diliyorum.
Bay_Y
Üye
Mesajlar: 116
Kayıt: 10 Mar 2014 11:12
Konum: İstanbul

Re: Timage to String

Mesaj gönderen Bay_Y »

Bir Sorunum var yardımcı olabilir misiniz ?

Var
SecPoz : Timage ;

Procedure resimekle(resim:Timage);
Var Strpic : String ;
Begin

lastik.Picture.Bitmap := nil ;
strPic := 'lz2.png';
resim.Picture.LoadFromFile(LastikPATH +strPic);
lastik.tag := 1 ;
end;
End;


resimEkle( TImage(Menu1.PopupComponent) ); Bu şekilde sorun yok
resimEkle( secpoz ); ama bu iekilde acess violation hatası veriyor

bunu değişkene atayıp sonrasında ekleyip kaldırmam gerekiyor ama hata verdi nedendir anlayamadım. Yardımcı olacak arkadaşlara teşşekkürler.

Resim
ertank
Kıdemli Üye
Mesajlar: 1657
Kayıt: 12 Eyl 2015 12:45

Re: Timage to String

Mesaj gönderen ertank »

Merhaba,

TImage bir sınıf (class) türündedir. Bu türdeki değişkenleri bir Integer veya string gibi kullanamazsınız. Öncelikle oluşturmalısınız. Formunuzun OnCreate() olayına aşağıdaki gibi bir kod ekleyin. Yüksek ihtimalle sorununuz düzelecektir.

Kod: Tümünü seç

procedure TForm1.FormCreate(Sender: TObject);
begin
  SecPoz := TImage.Create(Self);
end;
Bay_Y
Üye
Mesajlar: 116
Kayıt: 10 Mar 2014 11:12
Konum: İstanbul

Re: Timage to String

Mesaj gönderen Bay_Y »

merhaba Ertan bey öncelikle cevabınız için teşekkür ediyorum. Ama sanırım başka bir sorun var , çünkü bunu yeni bir proje oluşturduğumda yeni formlara eklediğimde çalışıyor ama çalışması gereken yerde çalışmıyor?

bu değişkeni sadece isim taşımak için kullandım o yüzden tanımlanması gerekmiyor diye düşündüm ama bu şekilde de denedim, yine de sonuç değişmedi.
Bay_Y
Üye
Mesajlar: 116
Kayıt: 10 Mar 2014 11:12
Konum: İstanbul

Re: Timage to String

Mesaj gönderen Bay_Y »

kusura bakmayın yordum sizi

secpoz := TImage(Menu1.PopupComponent)."Name" sonuna name eklemişim kaç saattir bakıyorum göremedim. Name ikaldırınca düzeldi. Tekrar teşekkürler.
Bay_Y
Üye
Mesajlar: 116
Kayıt: 10 Mar 2014 11:12
Konum: İstanbul

Re: Timage to String

Mesaj gönderen Bay_Y »

kusura bakmayın ara ara rahatsız ediyorum gereksiz vakit alıyorum ama ben bu sorgu sonunda dönen değeri mesela "a120" database e kaydedip
sonrasında bu a120 de yüklü olan resmi tekrar geri yüklemeliyim. bunu normal olarak kaydedersem string olarak sonra çağırdığımda herhangi birşey yüklerken hata veriyor. timage(alan) diyerek cevirsem bile farketmiyor yine aynı hatayı alıyorum.

bunu direk timage alanında saklamalıyım sanırım ama nasıl yapabilirim bilmiyorum bu konuda yardımınızı rica ediyorum.

derdim ilk mesajdaki resimlerdeki gibi üzerinde yüklü resimleri bir yerde saklamak sonra form çağrıldığında aynı resimleri geri yüklemek ama çok resim olduğu için resim1 , resim2 diye isim veremiyorum .
ertank
Kıdemli Üye
Mesajlar: 1657
Kayıt: 12 Eyl 2015 12:45

Re: Timage to String

Mesaj gönderen ertank »

Bu sorunuzu ayrı bir başlık altında sormalısınız.
Sorunuzun yeterli bilgi içermiyor (aldığınız hata mesajı nedir? mevcut hata veren kod nedir? kullandığınız database alt yapısı nedir? kullandığınız database bileşenleri hangileridir? vb)
Forum içinde çok benzer soru cevapları mevcut. (örn: viewtopic.php?f=2&t=36648)
Bay_Y
Üye
Mesajlar: 116
Kayıt: 10 Mar 2014 11:12
Konum: İstanbul

Re: Timage to String

Mesaj gönderen Bay_Y »

aslında bu linklere daha önce bakmıştım yapmak istediğim böyle birşey değil.
Teşekkür ederim yinede.
ertank
Kıdemli Üye
Mesajlar: 1657
Kayıt: 12 Eyl 2015 12:45

Re: Timage to String

Mesaj gönderen ertank »

Bay_Y yazdı:sorgu sonunda dönen değeri mesela "a120" database e kaydedip
sonrasında bu a120 de yüklü olan resmi tekrar geri yüklemeliyim.
Benim yukarıdaki ifadeden anladığım "a120" ifadesini ve resmi database içine kaydetmek istediğiniz ardından ihtiyaç olduğunda database içinden okuyarak ekranda göstermek istediğiniz yönünde. Paylaştığım bağlantıda da database içine resim kaydetme ile ilgili örnekler vardı.

Yapmak istediğinizi farklı bir şekilde anlatmanız mümkün mü acaba?
Cevapla