14 uygun sonuç bulundu

gönderen maxpaynen
31 May 2022 02:44
Forum: Programlama
Başlık: messagedlg butonlarının yazısını EVET HAYR yapmak.
Cevaplar: 18
Görüntüleme: 10871

Re: messagedlg butonlarının yazısını EVET HAYR yapmak.

function fnk_msgDLG1(const Msg: string; DlgType: TMsgDlgType; Captions: array of string ; myInt : Integer ): Integer; var Buttons: TMsgDlgButtons ; aMsgDlg : TForm; i : Integer; dlgButton : TButton; CaptionIndex : Integer; begin Buttons:=[]; for i := Low(Captions) to High(Captions) do begin if Capt...
gönderen maxpaynen
03 Eki 2021 06:00
Forum: Programlama
Başlık: Her satırda ayrı displayformat
Cevaplar: 1
Görüntüleme: 371

Re: Her satırda ayrı displayformat

Kod: Tümünü seç

procedure TfrmCariHareket.AdoHareketCHBorcGetText(Sender: TField;
  var Text: string; DisplayText: Boolean);
begin
DisplayText:=true;
 Text:=formatfloat('###,###,##0.00'+  AdoHareketCHParaBirimKodu.Value , Sender.AsFloat ); 
end;
buldum cevabını paylaşayım dedim.
gönderen maxpaynen
03 Eki 2021 05:28
Forum: Programlama
Başlık: 0 değerinin çıkmaması
Cevaplar: 3
Görüntüleme: 499

Re: 0 değerinin çıkmaması

Second := 1000;
olarak değiştir.
showmessage(IntToStr(FDQ.FieldByName('speed').AsInteger + Second));
yerine
showmessage(IntToStr(FDQ.FieldByName('speed').AsInteger * Second));
* çarpma işlemi kullan.
gönderen maxpaynen
03 Eki 2021 04:41
Forum: Programlama
Başlık: Her satırda ayrı displayformat
Cevaplar: 1
Görüntüleme: 371

Her satırda ayrı displayformat

Tablo Alanları Borç = Float Alacak = float ParaBirimKodu = String Borç ve alacağın görüntü formatını değiştirmek için AdoBorc.DisplayFormat:="###.###.###,00TL" kullanıyorum. Gayet başarılı çalışıyor. Fakat tüm listeye aynı formatta işlem yapıyor. Ben Parabirimkodu alanıma bağlı olarak form...
gönderen maxpaynen
18 Oca 2019 05:38
Forum: FireMonkey ve Mobil
Başlık: Android Form ile Çalışma Ve yok Etme
Cevaplar: 5
Görüntüleme: 4416

Re: Android Form ile Çalışma Ve yok Etme

problemi çözdüm. Zaten yeni başlamıştım yeniden oluşturdum iki formuda. Neden yaptığını henüz anlamış değilim. İlkinde Blank bir proje oluşturmuştum 2.cisinde HeaderFooterApplication seçtim. veya ilkinde LoginForm alt klasördeydi şimdi aynı klasördeler. Bu şekilde bi problem yaşayan olursa seçenekle...
gönderen maxpaynen
18 Oca 2019 03:44
Forum: FireMonkey ve Mobil
Başlık: Android Form ile Çalışma Ve yok Etme
Cevaplar: 5
Görüntüleme: 4416

Re: Android Form ile Çalışma Ve yok Etme

Delphi Xe 10.2 de MainForm ve LoginForm diye iki tane form dosyam var. Önce main form açılıyor. deneme amaçlı butonla LoginForm dosyasını açtırdım. Fakat içindeki edit lerin işlemleri olmuyor. Yani loginForm.show yaptığımda loginform açılıyor ama Edit1, edit2 gibi alanlara tıklayıp işlem yapamıyorm....
gönderen maxpaynen
03 Oca 2019 06:47
Forum: Delphi VCL
Başlık: Cxgrid tableview style sheet değiştirme
Cevaplar: 2
Görüntüleme: 2551

Re: Cxgrid tableview style sheet değiştirme

tam amacını anlayamadım ama cxStyleRepository1 yaptığın stilleri [GridTabloAdı].Styles.Background := [cxStyleRepository1 Stil Adı]; [GridTabloAdı].Styles.Content:= [cxStyleRepository1 Stil Adı]; ..... Kolonlar içinde [Colon Adı].Styles.Background := [cxStyleRepository1 Stil Adı]; [Colon adı].Styles....
gönderen maxpaynen
17 Ara 2018 01:19
Forum: Delphi VCL
Başlık: Başlangıç Tanıtımı Oluşturma
Cevaplar: 2
Görüntüleme: 3020

Başlangıç Tanıtımı Oluşturma

çoğu programı ilk kurduğumuzda ilk başta tanıtım yapılıyor. Örneğin görsel şekilde tıklanması gereken buton ön plana alınıp geri kalanlar gri bırakılarak yeni kayıt oluşturmak için burayı tıklayın gibi. Kenarında botunun işlevini anlatan kısa bir bilgi. bunu delphide yapmanın kolay bir yolu varmı. v...
gönderen maxpaynen
07 Ağu 2018 04:49
Forum: Programlama
Başlık: mause hareket ederse r2 sn de bir resim kaydeden prg.
Cevaplar: 3
Görüntüleme: 700

Re: mause hareket ederse r2 sn de bir resim kaydeden prg.

forma Timer koy. 200ms lik olabilir. OnTimer içerisine aşağıdaki kodu yapıştırabilirsin. procedure TForm3.Timer1Timer(Sender: TObject); var MausPos: TPoint; begin GetCursorPos(MausPos); Caption :='X Koord : ' +IntToStr(MausPos.x) +'Y koord :'+ IntToStr(MausPos.y); end; Yukarıdaki kod mousenin her ye...
gönderen maxpaynen
18 Tem 2018 11:14
Forum: Programlama
Başlık: cxgrid sütun sırası ve filtreleme
Cevaplar: 5
Görüntüleme: 1363

Re: cxgrid sütun sırası ve filtreleme

Çoklu sütunlara göre sıralamak için, Shift tuşunu basılı tutarken sütun başlıkları tıklanmalıdır. Görünmez bir sütun kullanarak birden çok sıralamak istiyorsanız, GridView.OptionsCustomize.ColumnSorting seçeneğini devre dışı bırakmanızı ve GridView'ın OnMouseUp olayını işlerken sütunun SortOrder öze...
gönderen maxpaynen
14 Tem 2018 05:33
Forum: Programlama
Başlık: Webbrowser Login İşlemi
Cevaplar: 4
Görüntüleme: 5676

Re: Webbrowser Login İşlemi

Güvenlik kodu koymalarının sebebi zaten bu şekilde girişi engellemek. Site açılamadığı için inceleyemedim. Sen ordaki güvenlik kodu resmini aldırsan bile login yapıldığı andaki güvenlik resmiyle aynı resim olacağını sanmıyorum. WebBrowser bileşeni Windowsun Internet Explorerini delphide kullanmak iç...
gönderen maxpaynen
14 Tem 2018 05:09
Forum: Programlama
Başlık: Cep telfonundan sms gönderme
Cevaplar: 3
Görüntüleme: 1172

Re: Cep telfonundan sms gönderme

Muhtemelen android bi apiye bağlanıp SMS kullanıyo. Bu tarzda iş yapan sms firmaları api desteği sağlıyorlar. Sana androide bağlanıp sms göndermeyi tarif etmişler ama senin aradığın Windows uygulaması için uygun api kullanmak. Ben bi ara sms gönderme programı yapmıştım orda apiye bilgi iletiyodum id...
gönderen maxpaynen
14 Tem 2018 05:00
Forum: Paket Programlar
Başlık: Cari Kasa Programı
Cevaplar: 2
Görüntüleme: 3808

Cari Kasa Programı

Müşteri ve satıcı firmaların borç alacak işlemleri, kasa bölümünde ödeme ve tahsilat işlemleri günlük kasa defteri gibi işlemleri rahatlıkla kullanılabilecek bir program. Program Delphi Xe 10.2 kullanılarak yazılmıştır. Veri tabanı Ms-Sql ve Ms-Access desteklemektedir. Yazıcı çıktılar için FastRepor...