1210 uygun sonuç bulundu

gönderen SimaWB
06 Tem 2018 08:36
Forum: Delphi VCL
Başlık: dll thread synchronize callback metod problem.
Cevaplar: 2
Görüntüleme: 824

Re: dll thread synchronize callback metod problem.

TThread.Synchronize yerine TThread.Queue deneyebilirsiniz. Malum; Synchronize işin bitmesi için beklerken Queue beklemez.
gönderen SimaWB
02 Tem 2018 09:04
Forum: Delphi VCL
Başlık: https sll not found library
Cevaplar: 3
Görüntüleme: 568

Re: https sll not found library

Kullandığınız Delphi versiyonu destekliyor ise TNetHTTPClient kullanırsanız SSL DLL'leri ile uğraşmazsınız:
http://www.delphican.com/could-not-load ... brary.html
gönderen SimaWB
04 Haz 2018 02:55
Forum: Programlama
Başlık: Yeni Edit Bileşeni oluşturma ve YeniEdit.text'i değişkene atamak
Cevaplar: 3
Görüntüleme: 316

Re: Yeni Edit Bileşeni oluşturma ve YeniEdit.text'i değişkene atamak

KeyPress'te

Kod: Tümünü seç

TEdit(Sender).Text
kullanabilirsiniz.


Ayrıca oluşturduğunuz editler için liste oluşturabilirsiniz:

Kod: Tümünü seç

var
  Liste: TObjectList<TEdit>;
  //yada
  Liste: TObjectList;
gibi...
gönderen SimaWB
04 Nis 2018 09:10
Forum: Programlama
Başlık: Memo araya satır ekleme
Cevaplar: 5
Görüntüleme: 431

Re: Memo araya satır ekleme

Memo1.Lines.Insert()
gönderen SimaWB
19 Oca 2018 10:01
Forum: Programlama
Başlık: Webbrowser olevariant to jpegImage problem
Cevaplar: 5
Görüntüleme: 287

Re: Webbrowser olevariant to jpegImage problem

uses MSHTML;
gönderen SimaWB
18 Oca 2018 05:40
Forum: Programlama
Başlık: Webbrowser olevariant to jpegImage problem
Cevaplar: 5
Görüntüleme: 287

Re: Webbrowser olevariant to jpegImage problem

WebBrowser'daki bir resmi form üzerindeki bir TImage nesnesi içine aşağıdaki kodla çizdirebiliyorum: procedure TForm4.Button2Click(Sender: TObject); var Doc : IHTMLDocument3; imgEL : IHTMLImgElement ; imgRND : IHTMLElementRender ; begin Doc := WebBrowser1.Document as IHTMLDocument3; imgEL := Doc.get...
gönderen SimaWB
10 Oca 2018 11:19
Forum: Programlama
Başlık: Multithread application ile çözüm üretmek
Cevaplar: 8
Görüntüleme: 633

Re: Multithread application ile çözüm üretmek

MultiThread çalışmanın en büyük zorluğu da budur zaten: Kodunuzu derlerken sorun olmaz. Onlarca kez çalıştırırsınız sorun olmaz. Ama bir bakmışsınız "bazı" müşterilerde "bazen" sorun çıkar. Bizler doğal olarak sorunu işletim sisteminde, donanımda vs. ararız. Çünkü aynı yazılım bir sürü yerde sorunsu...
gönderen SimaWB
03 Oca 2018 05:12
Forum: Programlama
Başlık: TCP Client
Cevaplar: 3
Görüntüleme: 351

Re: TCP Client

Ayrı bir thread içerisinde sürekli olarak IdTCPClient'in InputBuffer'ın boş olup olmadığını kontrol etmelisiniz. Tabi bu thread'e parametre olarak IdTCPClient'ı tanıtmalısınız. Aşağıdaki kabaca örneklemeye çalıştım. procedure TBirThread.Execute; var rxBuf: TIdBytes; begin while not Terminated do beg...
gönderen SimaWB
26 Ara 2017 09:28
Forum: Programlama
Başlık: how to add / extract header from tidbytes ?
Cevaplar: 4
Görüntüleme: 257

Re: how to add / extract header from tidbytes ?

if you use string then you have to send the length of this string to another side. So; may be your THeader type should be like this:

Kod: Tümünü seç

THeader = packed record
  ChannelnameLength: Integer;
  Channelname: string;
  Channelnumber: integer;
end; 
gönderen SimaWB
26 Ara 2017 02:59
Forum: Programlama
Başlık: how to add / extract header from tidbytes ?
Cevaplar: 4
Görüntüleme: 257

Re: how to add / extract header from tidbytes ?

You can use Move procedure. Like this:

Kod: Tümünü seç

var
  NewBuffer: TIdBytes;
  header: THeader;
 begin
   SetLength(NewBuffer, Length(BufferChannel) + Length(header.Channelname) + SizeOf(header.Channelnumber));
   Move(BufferChannel[0], NewBuffer[0], Length(NewBuffer));
Then send NewBuffer...
gönderen SimaWB
19 Ara 2017 08:49
Forum: Programlama
Başlık: Türkçe karakter kullanmaya cesaret ediyor musunuz
Cevaplar: 2
Görüntüleme: 369

Re: Türkçe karakter kullanma cesaret ediyor musunuz

Ben şu şekilde kullanmıyorum:

Kod: Tümünü seç

type
  TSabır = class
    class procedure Çek;
  end;
 
class procedure TSabır.Çek;
begin
  WriteLn('Allahım sen sabır ver!');
end;

begin
  TSabır.Çek;
end.
gönderen SimaWB
11 Ara 2017 08:28
Forum: Programlama
Başlık: IDUDPSERVER communicate with spicfic client
Cevaplar: 9
Görüntüleme: 353

Re: IDUDPSERVER communicate with spicfic client

"all connected clients" ???
UDP is connectionless protocol. So you really don't have connected clients. Or you don't know the client is really connected...