Delphi Forum

Üstat, SQL ile yapmam lazım
En azından İsimlerin bulunduğu comboboxtaki Noktalı virgül ile belirlenilen isimleri parse ederek listboxa atarsam SQL tarafını kendim halledecem.
Comboboxtaki isimlerin ayraçlanmış halinden listboxa altalta gelecek şekilde yapmam gerek.


tamam işte verdiğim örnekteki ...

Firebird içinde Stored Procedurde aşağıdaki şekilde kullanıyorum sizinde işinizi görür
ARANAN VARCHAR(1024) şeklinde bir input alıp bunun Replace ile sorgusunu oluşturup kullanıyorum.
SARA variant tanımlı bu arada. ASCII_CHAR (44) virgül oluyor, ASCII_CHAR (59) noktalı virgül oluyor, virgül ile ...

Kayıt işleminden sonra commitretaining yapmak verileri fiziksel veritabanına yazar. fakat bunu yaptıktan sonra ilgili tabloda yeni gelen kaydı görebilmek için tabloyu da close-open yapmanız gerekmektedir. Eğer diğer kullanıcılar bu kaydı hemen görsün istiyorsanız "event" kullanmanız gerekmektedir ...

Ben boreas 'ın yöntemini yayınladığı günden beri kullanıyorum. Hiç bir sıkıntı yaşamadım. Tavsiye ederim. Hızlı ve Doğru çalışıyor.
Arkadaşa katılıyorum, sitesinde gördüğüm günden bu yana kullanıyorum, daha önce de bahsi geçmişti hiçbir hız problemi yaşamadan kullanılabiliyor. Sanırım o yöntem ...

Selam aşağıdaki şekilde HAVING kullanarak çalışabilir belki, denemedim kodu.


select
MUSTERI.HESAPKODU,MUSTERI.ADI,MUSTERI.CARISINIR,
HESAPCARI.HESAPNO,
SUM(HESAPCARI.BORC)-SUM(HESAPCARI.ALACAK) AS BAKIYE
FROM MUSTERI, HESAPCARI
WHERE MUSTERI.HESAPKODU=HESAPCARI.HESAPNO
GROUP BY MUSTERI.HESAPKODU ...

begin ve end var ama else nerede ?durum buysa kırmızı yap değilse eski rengine döndür mesela (ACanvas.Brush.Color := clWhite;) demeniz gerekli.

Selam,
aşağıdaki linkteki @emin_as arkadaşın verdiği örnekteki integer koşulu @mehmetantalya arkadaşımızın verdiği "pos" ile uygularsanız işinizi çözecektir.

http://delphiturkiye.com/forum/viewtopi ... me#p143179

Selam, aşağıdaki linkte açıklamış nasıl yapılabileceğini. Kısaca arduino kartın giriş portlarına bilgisayarın seri portundan delphi ile yazdığınız program ile veri gönderip istediğinizi yaptırabilirsiniz.

http://www.vwlowen.co.uk/arduino/usb-di ... ontrol.htm

Tekrar Selam,
http://www.direnc.net/USB-Port-Kontrollu-4-Lu-Role-Kiti,PR-25792.html
yukarıdaki linkteki kart işinizi fazlasıyla görecektir. USb kontrollu 4 kanal 12v röle ile Max. 250 V 7A sürülebiliyor.
Yani 1,5-1,75 KW lık motoru sürebilirsiniz. Yalnız motor daha fazla güç isterse büyük ihtimalle ...

Merhaba,
Klasörde dosya uzantısından VT lerinizi taratıp combobox içine atmanız yeterli olur.

Delphi değilde Lazarus ile yazılan programlar çalışabiliyor sanırım, lazarusu bi araştırın delphi nin free versiyonu gibi.

Sanırım öyle olduk

Selam,
bilgisayardan 12 V çıkış alamazsınız, seri, paralel ve usb giriş-çıkışların hepsi 5V diye biliyorum. 12 V ile tetikleme için internetten araştırısan transistorlu devreler bulabilirsin. 5 V ile 12 V tetikleyip onunlada kontaktörünü tetikleyebilirsin diye düşünüyorum, PNP transistor, birkaç ...

Selam,
İstediğin şeyle bi ara uğraşmıştım, button tıklama değil de program mesela alta alınmış isede de sen örnek excel yada word de çalışırkende barkod okuyucudan gelen veriyi algılayıp programımda işlem yaptırmak istiyordum fakat ben başaramamıştım. HID device olarak gelen verinin hangi cihazdan ...

procedure TForm1.Button3Click(Sender: TObject);
var
Say: String;
Total: Extended;
begin
Say := StringReplace('29,0320', ',', '', [rfReplaceAll]);
Total := StrToInt(Say) + 1000;
Caption := FormatFloat('##,####', StrToFloat(FloatToStr(Total)));
end;

Öncelikle 29,0320 yi 29.0320 yapman lazım ...