19 uygun sonuç bulundu
- 17 Ağu 2018 02:47
- Forum: Programlama
- Başlık: Fatura Hareketlerinde Fatura ID'si
- Cevaplar: 19
- Görüntüleme: 2071
Re: Fatura Hareketlerinde Fatura ID'si
function GenerateKey: String; // 36 karekter dönecek var MyGUID: TGUID; MyWideChar: array[0..100] of WideChar; begin {First, generate the GUID:} CoCreateGUID(MyGUID); {Now convert it to a wide-character string:} StringFromGUID2(MyGUID, MyWideChar, 39);//uzunluğu 39 karakter yap {Now convert it to a...
- 17 Mar 2018 10:52
- Forum: Makale ve İpucu
- Başlık: Devexpress cxScheduler ile Ajanda / Günlük / Etkinlik Görünümleri Oluşturmak
- Cevaplar: 3
- Görüntüleme: 3810
Re: Devexpress cxScheduler ile Ajanda / Günlük / Etkinlik Görünümleri Oluşturmak
Sayın fesiharslan,
Ajanda çalışması kodlarını paylaşırmısınız?
Ajanda çalışması kodlarını paylaşırmısınız?
- 02 Şub 2018 11:43
- Forum: Programlama
- Başlık: iki alfanümerik arası sorgu yapma
- Cevaplar: 8
- Görüntüleme: 812
Re: iki alfanümerik arası sorgu yapma
//System.RegularExpressions function ExtractNumbers(const s: string): string; var regex: TRegEx; begin Result := ''; Result := TRegEx.Replace(s, '\D', '') end; procedure TForm1.Button1Click(Sender: TObject); begin Edit1.Text := ExtractNumbers('ABC1000000'); //Sonuc 1000000 end; procedure TForm1.But...
- 02 Şub 2018 10:34
- Forum: Programlama
- Başlık: iki alfanümerik arası sorgu yapma
- Cevaplar: 8
- Görüntüleme: 812
Re: iki alfanümerik arası sorgu yapma
Kod: Tümünü seç
function SadeceRakamlar(s: string): string;
var
i: integer;
rsp: string;
begin
Result := s;
if Length(s) < 1 then Exit;
rsp := '';
for i := 1 to Length(s) do
begin
if s[i] in ['0'..'9'] then
rsp := rsp + s[i];
end;
Result := rsp;
end;
- 21 Oca 2018 12:51
- Forum: Programlama
- Başlık: Devexpress cxGrid Server Mod konusunda tecrübesi olan var mı?
- Cevaplar: 9
- Görüntüleme: 1950
Re: Devexpress cxGrid Server Mod konusunda tecrübesi olan var mı?
DataSet olarak veri alamaz iseniz, bu işlem ile bilgileri alabilirsiniz. procedure Tmain_frm.<View>CellClick( Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean); var IdValue:Variant; begin if assigned(ACellV...
- 21 Oca 2018 12:39
- Forum: Programlama
- Başlık: Devexpress cxGrid Server Mod konusunda tecrübesi olan var mı?
- Cevaplar: 9
- Görüntüleme: 1950
Re: Devexpress cxGrid Server Mod konusunda tecrübesi olan var mı?
Şu an projelerimde kullanıyorum. Sql sorgusu ne kadar basit ise hız 100.000 kayıt da mili saniye diyebilirim(Server yoğunluğu ve hızı önemli).
- 20 Oca 2018 10:09
- Forum: Programlama
- Başlık: Devexpress cxGrid Server Mod konusunda tecrübesi olan var mı?
- Cevaplar: 9
- Görüntüleme: 1950
Re: Devexpress cxGrid Server Mod konusunda tecrübesi olan var mı?
Yada bu şekilde bağlanabilirsiniz. unit uMain; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, dxServerModeUniDACDataSource, dxServerModeSQLAdapters, DBAccess, cxGraphics, cxControls, cxLookAndFeels, cxLookAndFeelPainters, cxStyles, cxCustomData, cxFilter, c...
- 20 Oca 2018 10:02
- Forum: Programlama
- Başlık: Devexpress cxGrid Server Mod konusunda tecrübesi olan var mı?
- Cevaplar: 9
- Görüntüleme: 1950
Re: Devexpress cxGrid Server Mod konusunda tecrübesi olan var mı?
UniDac server Mode Component
- 03 Haz 2017 05:57
- Forum: Programlama
- Başlık: Outlook üzerinden mail gönderme
- Cevaplar: 3
- Görüntüleme: 1068
Re: Outlook üzerinden mail gönderme
function IsObjectActive(ClassName: string): Boolean; var ClassID: TCLSID; Unknown: IUnknown; begin try ClassID := ProgIDToClassID(ClassName); //Result := GetActiveObject(ClassID, nil, Unknown) = S_OK; Result :=CLSIDFromProgID(PWideChar(WideString(ClassName)), ClassID) = S_OK except // raise; Result...
- 27 May 2017 05:40
- Forum: Programlama
- Başlık: rad stüdio 10.2 kurulum
- Cevaplar: 5
- Görüntüleme: 1891
Re: rad stüdio 10.2 kurulum
Mobil mail gönderme için "could not load ssl library" hatası aşağıda so dosyalarını Android->debug yada Android->relase ye koy
libssl.so,libcrypto.so
Ek: https://mega.nz/#!4VUSSDyb!GPwL15g4P4rk ... MHCzs8hge8
libssl.so,libcrypto.so
Ek: https://mega.nz/#!4VUSSDyb!GPwL15g4P4rk ... MHCzs8hge8
- 27 May 2017 06:57
- Forum: Programlama
- Başlık: rad stüdio 10.2 kurulum
- Cevaplar: 5
- Görüntüleme: 1891
Re: rad stüdio 10.2 kurulum
mail gönderme için "could not load ssl library" hatası veriyor ise exe ile aynı yere aşağıdaki dll leri koymanız sorununuzu çözecektir.
libeay32.dll,ssleay32.dll
libeay32.dll,ssleay32.dll
- 01 Mar 2017 12:28
- Forum: Programlama
- Başlık: İçiçe birden fazla if
- Cevaplar: 3
- Görüntüleme: 743
Re: İçiçe birden fazla if
Kod: Tümünü seç
case deger of
0:begin
//yapılacak işlem
end;
1:begin
//yapılacak işlem
end;
2:begin
//yapılacak işlem
end;
else
//default değer
end;
- 19 Ara 2016 11:14
- Forum: Programlama
- Başlık: Cxgrid hücresinde değer kontrolu
- Cevaplar: 2
- Görüntüleme: 520
Re: Cxgrid hücresinde değer kontrolu
procedure Tinvoiceoutedit_frm.contentGridTableViewCellClick( Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean); var VIndex:Integer; VPMoveid:string; begin VIndex:= ACellViewInfo.GridRecord.Index; VPMoveid ...
- 04 Kas 2016 09:12
- Forum: Programlama
- Başlık: hata : unable to create process: the requested operation requires elevation.
- Cevaplar: 7
- Görüntüleme: 1083
Re: hata : unable to create process: the requested operation requires elevation.
Project->Options->Applications
Manifest Files
Auto Generate (Seçilecek)
Enable Administrator Privileges (Seçilecek)
OK
Otomatik olarak manifest dosyası oluşturulacak.
Manifest Files
Auto Generate (Seçilecek)
Enable Administrator Privileges (Seçilecek)
OK
Otomatik olarak manifest dosyası oluşturulacak.
- 02 Kas 2016 09:12
- Forum: Programlama
- Başlık: hata : unable to create process: the requested operation requires elevation.
- Cevaplar: 7
- Görüntüleme: 1083
Re: hata : unable to create process: the requested operation requires elevation.
XE10 nu yönetici olarak çalıştır. Hata izinsiz dosya yazma yada oluşturrmadan kaynaklanıyor.