Sql den sonucu Memoya alma

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
conari
Üye
Mesajlar: 2102
Kayıt: 27 Nis 2006 03:10
Konum: İstanbul & Gebze Karışık

Sql den sonucu Memoya alma

Mesaj gönderen conari »

Arkadaşlar SQL 'den dönen bir sonuç var.

Örnek
A - B - C
1 Ali 250
2 veli 250

bunu, bu şekilde memoya nasıl aktaracağım.

Kod: Tümünü seç

while not(detayQuery.Eof) do
    begin
        memo1.lines.Add(detayQuery.Value);
        detayQuery.Next;
gibi bir kod blogumu kullanmam lazım yoksa bir grid üzerine alıp ordan mı memo ya alacağız. :cry:
Bir kelimenin anlamını öğretsen bile yeter..
ResimResim
Kullanıcı avatarı
rsimsek
Admin
Mesajlar: 4482
Kayıt: 10 Haz 2003 01:48
Konum: İstanbul

Mesaj gönderen rsimsek »

Dediğin şekilde olabilir. Eğer düzenli olmasını istiyorsan font u da currier new seçmen yeterli

Kod: Tümünü seç

hile not(detayQuery.Eof) do
    begin
        memo1.lines.Add(detayQuery.AsString + ' ' detay2Query.AsString+ ' ' detay3Query.AsString);
        detayQuery.Next;
gibi..
Bilgiyi paylaşarak artıralım! Hayatı kolaylaştıralım!!
Kullanıcı avatarı
conari
Üye
Mesajlar: 2102
Kayıt: 27 Nis 2006 03:10
Konum: İstanbul & Gebze Karışık

Mesaj gönderen conari »

Hoca slm,
Hemen denedim,
Memo.Lines.Add(detayQuery.AsString);

Kod: Tümünü seç

[Error] Undeclared identifier: 'AsString'
Hatasını aldım.

Field[1].value + Field[2].value +Field[3].value

şeklinde eklesem yermı acaba bunu deneyeceğim.

Font olayı işimi görmüyor. Çünkü mail göndereceğim.
Bir kelimenin anlamını öğretsen bile yeter..
ResimResim
Kullanıcı avatarı
conari
Üye
Mesajlar: 2102
Kayıt: 27 Nis 2006 03:10
Konum: İstanbul & Gebze Karışık

Mesaj gönderen conari »

Evet oldu.

Kod: Tümünü seç

 while not(detayQuery.Eof) do
    begin
    mailMemo.Lines.Add('<h5>'+(detayQuery.Fields[1].Value)+' ---- '+(detayQuery.Fields[2].Value)+' ---- '+IntToStr(detayQuery.Fields[3].Value)+'<h5>');
      detayQuery.Next;       end;
Teşekkürler.
Bir kelimenin anlamını öğretsen bile yeter..
ResimResim
Cevapla