Delphi Forum

sarp_halit arkadaşıma eklemeden dolayı teşekkür ediyorum..

Bu konuda ActionList de kullanabilirsin. Projene birtane action list ekle. Bu bileşen üzerinde sağ tıkla, Action List Editor' den kendine yeni tanımalamar yap. Yeni, Kaydet, Sil gibi. Bu tanımlamar üzerinde iken Object inspector'dan ...

S.A.

Kolay gelsin.

ON KEY PRESS olayına
if key = (vk_ctrl) and (vk_y) then
begin
.........
.........
end;

şeklinde yazabilirsin.
(ama ctrl+y nin tam kullanımı bu şekildemi emin değilim :oops: )

Hatta yapçağın işle ilgili buton varsa kod alanna BUTTON1.CLICK; yazarak aynı kodları yazmamış ...

S.A.
satırında hata var gibi geliyor bana...
bu şekilde deneyebilirmisin..

Kolay gelsin..

S.A.

kolay gelsin..

quickreportu bağladıgın query nesnesine


select (AD + SOYAD) isim , adres
from tablo

şeklinde kod yazıp qrdbtext alanını da isim alanına bağlarsan ad ve soyad bitişik olarak gelebilir..

quickreportta denemedim ama daha önce bu tip bir yapıyı grid için kullanmıştım..ve ...

ASLANGERİ kardeşim tekrar teşekkürler...

sorunu şimdi tam olarak çözdük...

ikinci sorumun cevabı ise çok basitmiş...
query.close;
query.execsql;
query.open;

bu şekilde query içine yazlıan kodlar çalıştırılıp sonuç alınıyor...
(1. veya 2. seminerde execsql in yaptığı işi anlatıyordu ama gözden ...

VKAMADAN kardeşim verdiğin bilgiden dolayı çok teşekkür ederim.
ASLANGERİ kardeşim sana da teşekkür ederim.

Şimdi çıkardığım sonuç:Query nin içine kodları yazmak ve programın içinden PARAMBYNAME veya PARAMS la değerleri göndermek...Bu şekilde hem performansı artırmak hem de sürekli aynı kodları ...

ASLANGERİ Kardeşim Çok teşekkür ederim.. Allah Razı olsun. Biraz başını ağrıttım..(her zamanki gibi :lol: )

Yanlız soru soruyu getiriyo gibi oluyo..(okulda herşeyden biraz biraz verilince hiç birşey öğrenemeden mezun olduk işte)

with dm.sevrak_kayit do
begin
close;
sql.Clear;
sql.Add('select ...

arkadaşlar ilginize çok teşekkür ederim.

Aslangeri kardeşim anladığım şu: Query içindeki kodu sürekli clear edip aynı kodları yazmak sorguyu yavaşlatıyor..
Bunun yerine program içinden değer göndermek performansı artırıyor...Doğru mu anladım acaba?

Bahsettigin olay için ben şöyle bir yapı ...

S.A.

tüm forma kolay gelsin. İyi çalışmalar...

Formda sıkça karşılaştığım bir kod.. parambyname
(belki Mustafa hocam biraz kızacak niye aramadın diye ama :oops: )

Bu kod ile query e değer gönderiyoruz tamam. Kullanımı da zaten hemen hemen formun tamamında var.Ama ben çalışma mantığını ...

viewtopic.php?t=4779

kolay gelsin...

dostum aynı sorunu ben de yaşadım...

sağolsun üstadlar çözümü buldu...linki incele bi istersen..

S.A.

kolay gelsin...

acaba VarArrayOf([edit1.Text]) kullanımında nasıl bir sonuç döndüğünü biraz açıklarmısınız?

Kısaca ne amaçla kullanılıyor...

kolay gelsin..

S.A.

kolay gelsin...
Eğer query nesnesi ile yapıyorsan belki bir fikir verebilir..Kesin çözüm olma olasılığı nedir bilemem ama :lol:


query1.close;
query1.sql.clear;
query1.sql.add(' select * from TABLO');
query1.sql.add(' where sac_rengi='''+combobox1.text+'''');
query1.sql.add(' and goz_rengi ...

S.A.
şeklinde bir denermisin...

('OKUL' => tablondaki alan adı...
edit1.text => alan içerisinde aranacak değer...)

TÜM FORMUN MİRAC KANDİLİNİ TEBRİK EDERİM

S.A.

forma timer nesnesi (system comp. içinde) ve label ekleyerek de yapabilirsin...

label3.Caption:=copy(label3.Caption,2,length(label3.Caption)-1)+label3.Caption[1];


kodu timer nesnesine çift tıkla ve yapıştır.(timer özelliğinin içine)

yazının kayma hızını da INVERTAL properties'inden ...

S.A.

eğer query nesnesi kullanıyorsan;
SELECT MAX(M_NO)
FROM "musteri_kart.dbf" Musteri_kart

query nesnesine bu kodu yaz..( bu yolu formdan buldum :!: )
M_NO: number tipinde bir değişken...

farklı ve uzun bir yol sorarsan eğer
i:=0;
repeat
i:=i+1; // döngüden çıkana kadar değeri 1 artırır
dm.m ...