Delphi Forum

Bunu Hiç düşünememiştim saolasın
Memo Satırlarını konturol edeceğim ve ona göre
yükleme ve kaydetme işlemini yapacağım
Memo ise tüm ürün biligilerini alacak
satırlara göre komut nasıl veririm şimdi bunu yapmaya çalışacağim
Çook teşekkürler

Sorsam Ayıp olurm acaba kaç yaşındasınız?
Size karşı hitap ...

Yazmayı unutmuşum devamı
SVLst.Items.Save(Edit.tex'.Text');
Bu şekilde yapmamın amacı ürün isimlerine
göre ayrı ayrı Text uzantısında kaydediyor
Text uzantısını vermessam isme göre yine
dosyalar kaydedecektir
Ben ürün bilgilerinin hepsi birden yüklen sin istemiyorum sadece
Listbox1 deki seçilen ...

Button1 içeriğindeki
SVLst.Item.Save(Dosya); Şeklinde kaydetsin
Bir de Listbox1 ve 2 kutuları olsun her kaydedildilğinde
ListBox1 e Edit kutusunna girilen Ürün ismini kaydetsin
ve ListBox1 e Tıkladımgımda seçili olan isme göre
SVlist in kaydettiği Dosyadan tekrar Listbox2 ye
yüklesin istiyorum ...

İlk önce hazırladığım programı yazayım


var
var
UrunFrm:Tform;
SVLst:Tlistbox
Msj:TLable;
Kayfet,Iptal:Tbutton;
procedure Tform1.Button1click(Sender:Topject); //Kaydet
var
Al,Sat,Adet, T_Al,T_Sat,Kar:Real;//Başında T_ (Toplam)dır
Begin
Al:=StrtoFloat(Edit1.text);
Sat:=StrToFloat(Edit2.tex);
Adet ...

Arkadaşlar güzel teşekkür ederim
Ama Neolur bana bunun nasıl yapıldığını söylermisiniz

var
NewForm1:Tform1;
Indexle:Integer=0;
Bellek:TStream;
Procedure TForm1.Button1Click(Sender:Topject);
Begin
Indexle:=ListBox1.ItemIndex;
NewForm1:=Tform1.Create(Owner);
Bellek:=Tsream.Create(Self);
Bellek:=TListBox1.Item.String[Indexle]
NewForm1.Caption:='Metin:'+Bellek+'_No:'+Indexle;
NewForm1 ...

Peki Dosya içeriğinde İstediğim satıra karektere ulaşa bileceğim bir seçenek yokmu

Bu örneğinde Sadece NewForm1.captiona Index Numarasını verir
Benim istediğim Index numarası değilde İndex Numarasında Bulunan
Metni İstiyorum


Örn:

//Liste
İndex Metin
0 Ankara
1 Burse
2 Çorum
Varsayalımki Indexten 1 seçili ama 1 değilde 1 de bulunan
Metni (Bursa) NewForm1.caption a aktarsın ...

Selam Millet
////////////////////////////////////////////////////////////
ListBox kutusunun İndex ini öğrene bilir değiştire bilir
Seçili olan indexteki Metni değiştire bilirim
Ama Seçili olon metni NewForm1.caption a nasıl aktara bilirim?


Procedure TForm1.CreatForm(Sender:Topject);
Begin ...

Yinede saolasın arkadaşım bu owner işini kitabımda bula bildim

Yeni:=TlistBox.Create(Owner);
Yeni.Parent:=NewForm1;
yada
Yeni.Parent:=Form2;
şeklinde yapa biliyorum

Yeniden oluşturduğum ListBox kutusunu yeni bir forma yada
farklı formlara sahiplendire biliyorum

Ama Owner(Sahipli) Yerine Self ...

Teşekkürler ben aslında parametreli bir şekilde yapıldığınıu biliyorum

örnek vereyim ama bunungibi bişeydi

save to file('Dosya.Txt'/ Buraya paragraf ,boluk ,satır gibi kodlar yazılıyordu )

LoadFromFile('Dosya.Txt'/Paragraf,boşluk,satır vs)

Sanıyorum böyle bişe olması lazım

Şimdi bunu ...

Selam Arkadaşlar

Listbox içerigini bir dosyaya kaydediyorum
ama Dosya içeriğindeki istedim paragrafa kaydedilmesini istiyorum

Listbox1.Items.add(Kayıtismi);
Listbox2.Items.add(Sahis bilgisi);

ListBox kutuları içindeki bilgileri Dosya içeriğine kaydedilmesini istiyorum ama ikincikez kayıt ...

Peki Ebebey lik (Owner) işlemi nasıl yapılıyoır_?

Selam Millet

Baylar Bayanlar TSream işlemi nasıl yapılıyor

Bir değişkene listBoxtaki bilgileri atamak istiyorum
değişkenle (Stream tipinde Değişken.Items.SavetoFile)Seklinde yapmak istiyorum
Nasıl yapa bilirim
Şimdiden herkeze Teşekkürler

Slm

Sahiplik ve ebebeyn lik işlkemleri nasıl yapılıyor bana yardım ede bilirmisiniz

Form 1 içeriğinde ki button1 i form 2 sahiplik ve(Veya )ebebeynlik yapmasını istiyorum

Şimdiden tşk