Hoşgeldin, Ziyaretçi
Sitemizden yararlanabilmek için Kayıt olmalısınız.

Kullanıcı Adınız:
  

Şifreniz:
  





Forumda Ara

(Gelişmiş Arama)

Forum İstatistikleri
» Toplam Üyeler: 3.930
» Son Üye: RIDVAN
» Toplam Konular: 6.705
» Toplam Yorumlar: 51.934

Detaylı İstatistikler

Son Aktiviteler
Kod yazma kolaylığı varmı...
Forum: Genel Programlama
Son Yorum:

frmman
8 saat önce
» Yorumlar: 9
» Okunma: 227
Yerli Yapım Mobil Uygulam...
Forum: Mobil Platform - FireMonkey (FMX)
Son Yorum:

nguzeller
Dün, Saat: 18:32
» Yorumlar: 58
» Okunma: 22.666
Sqlite trigger
Forum: Genel Programlama
Son Yorum:

Nedim
Dün, Saat: 18:02
» Yorumlar: 5
» Okunma: 70
CSV'ye veri aktarma
Forum: Mobil Platform - FireMonkey (FMX)
Son Yorum:

Mr.X
Dün, Saat: 11:49
» Yorumlar: 5
» Okunma: 139
Mac OS device tanımlama
Forum: Mobil Platform - FireMonkey (FMX)
Son Yorum:

barissagir
26-03-2024, Saat: 21:30
» Yorumlar: 6
» Okunma: 239
Alcinoe's play video
Forum: Mobil Platform - FireMonkey (FMX)
Son Yorum:

gbg
26-03-2024, Saat: 00:32
» Yorumlar: 4
» Okunma: 232
Datamodule üzerindeki Que...
Forum: Genel Programlama
Son Yorum:

mustafaozpinar
24-03-2024, Saat: 16:18
» Yorumlar: 4
» Okunma: 261
libmariadb
Forum: Mobil Platform - FireMonkey (FMX)
Son Yorum:

nguzeller
24-03-2024, Saat: 00:42
» Yorumlar: 1
» Okunma: 118
FMX Projelerinizde Ses Do...
Forum: Mobil Platform - FireMonkey (FMX)
Son Yorum:

xorpas
22-03-2024, Saat: 22:25
» Yorumlar: 15
» Okunma: 9.620
Web Servis SOAP
Forum: Genel Programlama
Son Yorum:

eyln
22-03-2024, Saat: 13:06
» Yorumlar: 19
» Okunma: 850

 
  Delphi XE6'da oluşan XML XE'de farklı. WSDL Wizard hata yapar mı ?
Yazar: boreas - 25-02-2019, Saat: 13:51 - Forum: Genel Programlama - Yorumlar (7)

Delphi XE6'daki WSDL ile ilgili örnek uygulamayı XE'e taşıyıp deniyorum.
XE6 user ve password değişkenlerine xmlns=””   parametresi eklerken, XE eklemiyor. Ve bundan dolayı hata alıyorum.
WSDL ile giden pakete bu parametreyi nasıl ekleyebilirim ?

Bu konuyu yazdır

  delphi guncelleme
Yazar: cexx - 25-02-2019, Saat: 13:36 - Forum: Genel Programlama - Yorumlar (7)

Arkadaslar selam linkdeki delphi guncelleme paketini alan var mi?

https://store.btgrubu.com/index.php?rout...uct_id=623

Fiyat belirtilmemis, muhtemelen güne duruma göre farkli fiyat uygulamasi var.

Inginctir guncelleme fiyatlari ile ilgili embarcaderonun da kendi online alisveris sayfasinda da bir fiyat yok.

Freelance program yaziyorum, elimdeki lisans 2 sene once alinmis 10.2 enterprise named user.  Gecenlerde BT grubu ile konustuk yeni 10.3 e terfi icin sifirdan aliyormus gibi bedeli odememi istediler.

Bu yaklasimla kimsenin elindeki surumu guncellemesini beklemek bana göre mümkun degil. Diyeceksiniz ki zamaninda "bakim anlasmani yenileseydin". Iyi de karsiliginda ne alacagim belli degil ki. Nitekim 2 senedir elle tutulut bir sey cikarmadilar.  Sonucta 10.2 ile 10.3 arasinda da iş yapma aliskanliklarimizi degistirecek bir fark da yok.

Yil 1985, Turbo pascal 7.0 dan beri bu urunu kullaniyorum. Kayitlarina bakarsaniz sadik musteriyim ama durum bir garip, bu strateji ile bu sadakati nasil surdurecegimi bilemiyorum... Belki kaçirdigimi görmedigim bir sey vardir onun icin sizler ne yapiyorsunuz ögrenmek istedim.MVP olup bedava almaya mi calisalim, Darknet'e mi girelim, ne yapalim...

Bu konuyu yazdır

  WSDL ile gönderilen zarfı nasıl görebilirim ?
Yazar: boreas - 25-02-2019, Saat: 09:31 - Forum: Genel Programlama - Yorumlar (4)

EDM ile e-fatura gönderme işlemine uğraşıyorum. Firmanın Login olma prosedürünü deniyorum. Kendi örnekleri ile XE6'da ve sorunsuz login olabiliyorum ama aynı kodu XE'de çalıştırdığım zaman kullanıcı adı şifre boş hatası alıyorum. Gönderilen zarfları karşılaştırmak adına kullanabileceğim bir site - araç vs. var mıdır ?

Bu konuyu yazdır

  FastReport ve Printer Kullanımı
Yazar: mcuyan - 24-02-2019, Saat: 19:06 - Forum: İpuçları - Yorum Yok

Merhaba arkadaşlar.

Çok işime yarayan bir kod bloğumu sizlerle paylaşmak istedim. 
Yapılmak istenilen şey: Yazıcı listesini Combobox'a alıp, seçilen yazıcıya FrX'imizi yazdırmak.

Adım 1: Combobox'a Printer listesini yüklemek (Uses'a Printers eklemeniz gerekiyor)

ComboBox1.Items.Assign(Printer.printers);


Adım 2: Seçilen Yazıcıya FrX reportu yollamak

  
frxReport1.PrintOptions.Printer := Combobox1.Text;
//  frxReport1.PrintOptions.Copies := 1; // Buraya İstediğiniz kopya sayısını yazabilirsiniz.
 frxReport1.PrintOptions.ShowDialog := False;
 frxReport1.PrepareReport(TRue);
 frxReport1.Print;

Yukarıdaki kullanım şekli ile FrX önizleme ekranı hiç açmadan direk yazıcıya gönderebilmenizi sağlar.

Bu konuyu yazdır

  Delphi 10.3 - Notification Token Akma Sorunu
Yazar: hakanharbeli - 24-02-2019, Saat: 02:43 - Forum: Mobil Platform - FireMonkey (FMX) - Yorumlar (3)

(20-02-2019, Saat: 21:34)Mr.Developer Adlı Kullanıcıdan Alıntı:
(20-02-2019, Saat: 20:59)hakanharbeli Adlı Kullanıcıdan Alıntı: ben den 10.3 kullanıyorum bir uygulamamın güncellemesini bu sürümle yapacağım bakalım sorun olursa buraya yazarım Smile

Hadi hayırlısı diyelim o zaman  Smile

Evet şunu farkettim. Push notification için version info'daki package kısmını bile imzalamıyor token alamıyorum cihazlarda bu sebeple... yani berline tekrar dönmek durumundayım çok üzüldüm rio iyiydi bu sorunlar olamsa

Bu konuyu yazdır

Lightbulb [FMX] Android - Indy ile HTTPS linklerine erişirken OpenSSL kütüphanesi kullanımı
Yazar: mrmarman - 23-02-2019, Saat: 20:07 - Forum: Makale - Yorumlar (7)

Merhaba.

- Windows'ta projenizin olduğu veya System Path içerisinde bir yere OpenSSL kütüphaneleri olan iki adet DLL dosyasını kopyalamak ile IdHttp ve TIdSSLIOHandlerSocketOpenSSL ikilisini sorunsuz kullanabiliyorduk. Bunu bir çoğumuz deneyimlemişizdir.

- Geçtiğimiz gün kurumda SSL erişimi için ANDROID projemde kullandığım HTTPS linklerine mobil platformdan erişirken lazım olduğunda kullandığım kütüphaneleri projemizde nasıl yapılandıracağımızı bir SSL erişim örneği ile özetleyeyim.

- Yine https://indy.fulgan.com/SSL/ linkinden başvurarak indireceğim Android destekli OpenSSL paketini indiriyoruz.

EKLEME: 64bit android platform için bu GitHub linkindeki kütüphaneleri kullanabilirsiniz.

a664sufkjy6mitsksyw3.png

Bu dosyayı bir klasöre açıyoruz içinde iki alt klasör göreceksiniz. 

tqdndhh2edmyugsisj2m.png


Bu alt klasörlerde ARM olanını açınca da 

gr6bj9wlqg1wfn79xskj.png

çıkan iki dosyayı projemiz ile deploy yani proje kurulumu yapılan mobil cihazın, projenize özel bir klasörüne koymasını sağlayacağız.

Bunun için PROJECT menüsünden alt kısımlar yakın olan DEPLOYMENT başlığını seçmeliyiz. 

r5zwcwv9z5ymlyvfyk9p.png

Burası çok önemli. Kırmızı ile daire içerisine aldığım Remote Path mutlaka .\assests\internal   (yazım hatasını düzeltiyorum  .\assets\internal ) şeklinde bize ait ulaşabileceğimiz bir klasör olsun ki aşağıda vereceğim örnekteki gibi TPath ile hazır erişim klasörlerinden erişebilelim.

hpg3fowcw9jt5ou9ex1j.png


Proje örneği... :idea:

Örnek Android projenizdeki forma bir TImageViewer yerleştirin ve aşağıdaki kodu yazın.
Buradaki kilit satır, SSL kütüphanenizin yerini bildiren şu satırdır.

   IdOpenSSLSetLibPath(TPath.GetDocumentsPath);


Uses Idhttp, IdSSLOpenSSL, IdSSLOpenSSLHeaders, System.IOUtils;

// Project / Deployment altında ".\assets\internal\" klasörü altına SSL .so dosyaları eklenir.
// IdOpenSSLSetLibPath(TPath.GetDocumentsPath) şeklinde bu klasör SSL path erişimine alınır
procedure TForm1.Button1Click(Sender: TObject);
Const
 CaptchaURL  = 'https://optik.sgk.gov.tr/Optik_Firma_Web/CaptchaServlet';
var
 IdHttp                : TIdHttp;
 IdSSLIOHandlerSocket  : TIdSSLIOHandlerSocketOpenSSL;
 MS                    : TMemoryStream;
 CaptchaImage          : TBitmap;
begin
 IdHttp               := TIdHttp.Create(nil);
 CaptchaImage         := TBitmap.Create; // Android'de PNG kabul ediyor...
 IdSSLIOHandlerSocket := TIdSSLIOHandlerSocketOpenSSL.create(nil);
 MS                   := TMemoryStream.Create;
 try
   IdOpenSSLSetLibPath(TPath.GetDocumentsPath);
   IdSSLIOHandlerSocket.PassThrough        := True;
   IdSSLIOHandlerSocket.SSLOptions.Method  := TIdSSLVersion.sslvTLSv1_2;

   IdHttp.IOHandler            := IdSSLIOHandlerSocket;
   IdHttp.Request.UserAgent    := 'Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/71.0.3578.98 Safari/537.36'; // 'Dalvik/2.1.0 (Linux; U; Android 8.0.0; SM-N950F Build/R16NW)';

   IdHttp.Get( CaptchaURL, MS );
   MS.Position := 0;
   CaptchaImage.LoadFromStream( MS );

// Web'den Captcha Image geldi..
   ImageViewer1.Bitmap := TBitmap.Create( Trunc(ImageViewer1.Width), Trunc(ImageViewer1.Height) );
   ImageViewer1.Bitmap.Assign( CaptchaImage ); // Görelim...
 finally
    CaptchaImage.Free;
    IdHttp.Free;
    IdSSLIOHandlerSocket.Free;
    MS.Free;
 end;
end;

Bu konuyu yazdır

  cxgrid sutun toplamı hatası (Çözüldü)
Yazar: cinarbil - 23-02-2019, Saat: 15:53 - Forum: Genel Programlama - Yorum Yok

iyi günler cxgrid de  tutar kolonunun toplamını almak istiyorum ama resimdeki hatayı veriyor.

yaptığın araştırmada string alan toplamaya çalıştığım için aldığım bilgisi var.

aşağıdaki kodda görüldüğü üzere  tutar alanını real tanımladın grid de ilgili kolonda değer görünüyor

kendim toplam aldığımda alıyor ama footer toplamında hata veriyor.
Kod :



var
satirno : integer;
tutar:real;
//////////////////////////////////////

while not (sarf_toplam_sorgu.Eof) do
   begin
    sarf_top_view.datacontroller.AppendRecord;
    satirno := sarf_top_view.datacontroller.RecordCount - 1;
    sarf_top_view.datacontroller.values[satirno,0] := inttostr(satirno + 1);
    sarf_top_view.datacontroller.values[satirno,1] := trim(sarf_toplam_sorgu.FieldByName('S_BAYI_ADI').AsString);
    sarf_top_view.datacontroller.values[satirno,2] := trim(sarf_toplam_sorgu.FieldByName('SU_ACIKLAMA').AsString);
    sarf_top_view.datacontroller.values[satirno,3] := sarf_toplam_sorgu.FieldByName('toplam').AsFloat;
    sarf_top_view.datacontroller.values[satirno,4] := trim(sarf_toplam_sorgu.FieldByName('SU_BIRIM').AsString);
    sarf_top_view.datacontroller.values[satirno,5] := sarf_toplam_sorgu.FieldByName('SU_FIYAT').AsFloat;
    tutar:= sarf_top_view.datacontroller.values[satirno,3]*sarf_top_view.datacontroller.values[satirno,5];
    sarf_top_view.datacontroller.values[satirno,6] := tutar;
    edit_kdvsiz.AsFloat:=edit_kdvsiz.AsFloat+sarf_top_view.datacontroller.values[satirno,6];
    sarf_toplam_sorgu.Next;
    end;


Grid Customize ayarlarında field  secili iken properties ayarlarında CurrencyEdit secili olması sorunu düzeltmedi.
Grid Customize ayarlarında field  secili iken  databindig ayarlarında string tanımlı burayı float veya CurrencyEdit seçilince sorun düzeldi.



Ek Dosyalar Ekran Görüntüleri
   
Bu konuyu yazdır

  Kitap Örnek Uygulamaları
Yazar: TescilsizUzman - 23-02-2019, Saat: 15:01 - Forum: Kitap Hakkında - Yorumlar (14)

Merhaba,
Kitap satın alan DelphiCan'lara örnek uygulamalar bölümüne giriş yetkisi verilmiştir.
Bu bölüme giriş yapamayan arkadaşlar öm ile durumu bildirmelerini rica ediyorum.

Bu konuyu yazdır

  lazarus pascalscada kullanımı hk.
Yazar: sadikacar60 - 23-02-2019, Saat: 14:32 - Forum: Delphi Linux - Yorumlar (2)

arkadaşlar bu kompenantı kullanan oldumu acaba. 
videoda yaptığım olayı bu kompenantı kullanarak nasıl yaparız.
ben bir türlü çözemedim


saygılarımla

https://www.youtube.com/watch?v=sSDeCp9MgSI&t=2s

Bu konuyu yazdır

  İmage Slider ''No Such File Or Directory Hatası"
Yazar: keceonurr - 23-02-2019, Saat: 12:24 - Forum: Mobil Platform - FireMonkey (FMX) - Yorumlar (5)

Herkese merhaba

Fmx ile İmage slider kullanarak resimler ekletmeye çalıştım ama beklemediğim bir hatayla karşılaştım. Bir çok çözümler denedim resim klasörünü başka yerlere taşıdım yine de bir çözüme ulaşamadım. 


Kodum şu şekilde

procedure Tfrm_anasayfa.AddBitmap(const FileName: string);
var
  Bmp: TBitmap;
  p: string;
begin
  Bmp := TBitmap.Create;
  try
{$IFDEF ANDROID}
    p := TPath.Combine(System.IOUtils.TPath.GetDocumentsPath, FileName);
{$ELSE}
    p := FileName;
{$ENDIF}
    Bmp.LoadFromFile(p);
    FMXImageSlider1.Add((FMXImageSlider1.PageCount + 1).ToString, Bmp);
  finally
    Bmp.Free;
  end;
end;
resim dosya yolunu uzun halini de yazdım ama aynı hatayı alıyorum;
procedure Tfrm_anasayfa.SpeedButton4Click(Sender: TObject);
begin
{$IFDEF  ANDROID}
  AddBitmap('resim\black1.jpg');
  AddBitmap('resim\daredevil2.jpg');
  AddBitmap('resim\groot.jpg');
  AddBitmap('resim\doctor.jpg');
  AddBitmap('resim\ironman.jpg');
  FMXImageSlider1.ActivePage := 0;
{$ENDIF}
end;


Aldığım hata ise şu şekilde
https://hizliresim.com/EmWWmn

Bu konuda bana yol gösterecek arkadaşlara şimdiden teşekkür ediyorum. .Herkese iyi çalışmalar

Bu konuyu yazdır