Delphi Forum

Aslinda cok da önemi yok fakat bilmek insani rahatlatiyor. Tamamen duygusal :D CompileVersion'u direktif ile sartlandirip virtual yada override seklinde bir degisken tutabilir miyiz? örnegin: const DEGISKEN = {$IF CompilerVersion < 22}virtual{$ELSE}override[$IFEND}; // XE'den kücükse virtual, aksi ...

Sizin yazdığınız program exe ise o exe dosyası herhangi bir prottan (sizin belirlediğiniz) yayın yapıyor olmalı, 127.0.0.1 yazarak çalışıyorsa ip girerekte çalışır muhtemelen 80 portundan çalışıyordur, modeminizden makinanızın ip adresine 80 portunu nat ile yönlendirme yaparsanız hem 127.0.0.1 hemde...

Paradox ile yıllarca uğraşmış biri olarak söyleyebilirim ki, hiç kullanmayın, firebird kullanın rahat edin.

Selam, Konu ilgimi çektiği için ve de bir örnek verebileceğim için yazayım dedim. Yaklaşık 4 yıl kadar önce bir projemde @gaus arkadaşın söylediği şekilde yapı kullanmak zorunda kalmıştım ve 4 yıldır sorunsuz ve hızlı bir şekilde çalışıyor. Fakat ben XML yada JSON kullanmadan basitçe bir ayraç ile v...

left, right, inner ... join kullanımını çalışın bence. Birde şunu gördüm sorguda, LEFT JOIN PERSONEL_BILGILERI ON STOK_HAREKETLERI_DETAY.CARI_KART_KIMLIK = PERSONEL_BILGILERI.PERSONEL_KIMLIK LEFT JOIN FIRMALAR ON STOK_HAREKETLERI_DETAY.CARI_KART_KIMLIK = FIRMALAR.FIRMA_KIMLIK LEFT JOIN PROJELER ON S...

function StringToCaseSelect (Selector : string; CaseList: array of string): Integer; var cnt: integer; begin Result:=-1; for cnt:=0 to Length(CaseList)-1 do begin if CompareText(Selector, CaseList[cnt]) = 0 then begin Result:=cnt; Break; end; end; end; procedure TPROJE_PUANTAJ_CIZELGESI.btn2Click(S...

procedure TForm1.btn3Click(Sender: TObject); var NORMAL_MESAI : Integer; i: Integer; Begin qryPUANTAJ_DB.DisableControls; qryPUANTAJ_DB.First; While not qryPUANTAJ_DB.Eof do Begin NORMAL_MESAI :=0; for i := 02 to 05 do Begin Case qryPUANTAJ_DB.FieldByName(IntToStr(i)).AsInteger of 0:Inc(NORMAL_MESA...

Query e daha önceden stok.BELGETARIH alanını ekleyerek bir sorgu yapmışsınız, sonra query de field leri eklemişsiniz, sonra query içeriğine yukarıdaki sorguyu alıp open yapmak istediğiniz zaman da, query de zaten stok.BELGETARIH field i daha önceden ekli olduğu ve yeni sorgunuzda stok.BELGETARIH fie...

Neden yapamadığınızı tam olarak anlamamakla birlikte şöyle basit bir örnek vereyim. http://www.delphiturkiye.com/forum/viewtopic.php?f=19&t=25294&hilit=+mail yukarıdaki örnek çalışıyor sanırım, oradaki html in içeriğini değiştirme işini basitçe şöyle yapabilirsiniz. önce formunuza bir memo k...

Selam,
ordaki HTML i delphi üzerinden neden değiştiremiyorsunuz? Önce bir memo da html i oluşturun sonra diske kaydedin daha sonra maile ekleyin gitsin.

copy(deger,başlangıç sayısı, kaç adet olacağı) ile yapabilirsiniz.

Merhaba, Bu konuda çalışan bir örneği bulmanız oldukça zordur, bu tip projeler komplike programlarda vardır, tek başına üretim programı yazan kişide programı paylaşmaz zaten. Genel mantığı kavradıktan sonra oturup rahatça yazabilirsiniz. @sunye arkadaşımız zaten biraz bilgi vermiş. Kendi kafanızda ş...

Arkadaşlar HATIRLATMATARIHI alanı varchar olarak tanımlı. Yazmayı unutmuşum bu arada. Kusura bakmayın Merhaba, Eğer tarih değerleri ise öncelikle alan tipini tabloda "timestamp" bezeri bir değer yapmanı öneririm. Bunu yapamıyor isen HATIRLATMATARIHI alanını SQL içinde "CAST" ede...

Arkadaşlar, Aşağıdaki kod ile ssatış detayı tablosunda nekadar giriş çıkış olmuş karmı zararmı ettiğini görüyordum sanıyordum :) 2 stok kartı var ama 4 tane gösteriyor neden olabilir acaba ? SELECT FROM STOK_KARTLARI SKT LEFT JOIN STOK_KARTLARI ALIS ON ALIS.ALIS_FIYATI<>'' ???? LEFT JOIN STOK_KARTL...

Select ve group by kısımlarından
ALIS.SATIS_FIYATI,
SATIS.ALIS_FIYATI,

satırlarını çıkartırsan düzelir.
Zira bu değerlere göre gruplama yap diyorsun, oda farklı gördüğü her değer için ayrı gruplama yapıyor.