Forum
Bildirimler
Hepsini Temizle
Yazılım Genel
4
Yazılar
2
Üyeler
0
Likes
1,961
Görüntüleme
Konu başlatıcı
1.. exeyi açtıp stringgrid nesnesini dolduruyorum Kaydet butonuna bastığım zaman tblurun_alınan tablosuna kayıt yapıyo
2. defa kayıt yapmayı istediğimde exeyi kapatıp yeniden açmam gerekiyor yenile butonu oluştursam
butona bastığım zaman string gridi formun ilk çalıştırıldığı gibi boş nasıl getiririm
2.. stringgrid üzerinde klavyenin vk_down tusuna bastığım zaman yeni satır oluşturuyor atıyorum 3 satır var 2 satırdayım alt satıra geçmek için vk_down bastığımn zaman 4. satırı oluşturuyor ben en son satırdayken satır oluştırmasını istiyorum bi türlü yapamadım
3.. string grid üzerinde fazla oluşturulmuş satırı nasıl silebilirim
şimdiden çok saolun kolay gelsin
Gönderildi : 16/07/2011 15:16
Konu başlatıcı
1. soruyu
For i:=1 to Form1.StringGrid1.RowCount-1 do
begin
Form1.StringGrid1.Cells[1,i]:='';
end;
bu şekilde çözdüm
ama 2. ve 3. sorularda hala takılıyorum...
Gönderildi : 18/07/2011 03:47
2.ve3.sorunun cevabı test edildi onaylandı
aşşağıda gördüğün gibin StringGrid in keydown eventine yazıldı
kodlar.
procedure TForm2.StringGrid1KeyDown(Sender: TObject; var Key:
Word;
Shift: TShiftState);
var i,j:Integer; HepsiBosmu:Boolean;
begin
if (key=vk_down) and (StringGrid1.Row=StringGrid1.RowCount-1)
then
begin
StringGrid1.rowCount:=StringGrid1.rowCount+1;
end;
if (key=VK_DELETE) then // DELETE TUŞUNA BASARAK SİLME
İŞLEMİ YAPABİLİRSİNİZ TABİ EĞER SATIRDA BİLGİ YOKSA
begin
HepsiBosmu:=True;
i:=0;
while HepsiBosmu and (i<StringGrid1.ColCount) do begin
HepsiBosmu:=HepsiBosmu and
(StringGrid1.Cells[i,StringGrid1.Row]='');
Inc(i);
end;
if HepsiBosmu then begin
with StringGrid1 do
begin
for i := Row to RowCount-2 do
for j := 0 to ColCount-1 do
Cells[j, i] :=
Cells[j, i+1];
StringGrid1.Cells[2,StringGrid1.RowCount-1]
:= '0';
RowCount := RowCount - 1 ;
end;
end
else
ShowMessage('Bu satırda bilgi vardır silinemez.');
end;
end;
Gönderildi : 19/07/2011 12:58
Konu başlatıcı
Çok tşk ediyorum Fatih Bey hemen deniyorum...
Gönderildi : 19/07/2011 14:41
