Delphi Forum

google dan "delphi serial port example" anahtar cümleden çıkan bazı arama sonuçları

https://www.youtube.com/watch?v=OF0TFBQKCSY

videodaki opensource comport component ın linki
https://sourceforge.net/projects/comport/files/
OnError diye bir event gördüm. Kodu incelersen fikir verebilir.

https ...

raporu preview etmeden önce ilgili frxMemo'lara atama yapabilirsin
kolay gele

sağdan departman seçtiğinde, soldaki gridleri temizlemen mantıklı olacaktır. vaktin olursa bootstrap kullanmaya çalış, unigui destekler, kısmen tabiki. (masalar ekrana belli bir miktara kadar tabi sığmalı, kullanıldığı ekrana bağlı tabi). yaz fontlarını da bir size belirle ve çok farklı sizelar ...

Fikir versin diye ekledim, kaynak http://delphiexamples.com/databases/addfield.html
bu linkte yani delphi nin help inde göründüğü üzere
https://docwiki.embarcadero.com/Libraries/Sydney/en/Data.DB.TFieldDef.CreateField
CreateField bir function ve result olarak oluşturduğu field ı döndürüyor. yani ...

numaralar arasına virgül yada noktalı virgül koyarak denedin mi? en net cevap gönderdiğin siteye yada bu xml i alan yere sorman olacaktır.

FieldDefs .CreateField(aowner);
AOwner ın form burada, olması hereken senin memtable ın.
memtable la uğraşmak yerine ki başkasının classı, gereksiz bir sürü code da yükleniyor. Bir integer, iki float sayın var. bunları record tipine çevir ve dinamik bir array de tut. ekleme silme sık olacaksa bu ...

Eline sağlık güzel olmuş, ama :D
Bunları yapan bir bach file hazırlasaydın çok daha fazla kullanmaya çalışan olur kanaatindeyim. Malum windows un yaygınlaşma sebebi, çift tıkla, sadece ileri, ileri de her şey hazır :)
nacizane tavsiyem, C değilde D sürücüsünü kullanın. format vs gibi işlemlerde ...

.... en ufak değişiklikte evrak bozuluyor.


amaç ta o zaten. adalet bakanlığının bunu yapma sebebi bu. Digital ortamda evrak sahtekarlığının önüne geçişmesi. Bunu aşamazsın, aşma yolunu bulursan da bakanlığın sistemi çökmüş demektir :D bir sürü dava pert olur :)
doc yada rtf ye delphiden ...

Devletin memurundan iş bekleme. Bir müdür ün bana verdiği cevaptır " Evinde yatsa da buraya da gelse aynı parayı alıyor neden çalışsın ki?"
udf i bi ara kendilerine şart koşmuşlar, yapmışlar, muhtemelende işin içinde fetomanlar vardı. neyse,
https://www.youtube.com/watch?v=sgX31LB42vg
Burdan ...

AutoCommit değilde, AfterPpost Eventinde CommitRetaing kullanın. DataSet deauto edit True yapın, form Açılırken TQuery yi edit moda geçirmeyin, kullanıcı değişiklik yaparsa auto geçer ve transaction başlar.

...
Yani sizin lehçede ; "Kemal'e ermiş bir Zat-ı Muhterem olmuş". diyebiliriz.
..

Hepten dinazor yapsın ya beni :lol:
Yazını okuyunca fark ettim ki, Meraklılar özellikle de yazılım dili başka bir deyişle, yazılımcı olmayı isteyenler, mutlaka "free pascal" ve bununla yazılmış pascal projesi ...

Kullanılması konusunda ben çekimserim, geçmişten kalan tecrübe. Örnek, compile sırasında info form açılırdı, alaman keferesi ben kullanmıyorum dedi ve kaldırdı. Bir diğeri, x64qt yoktu, ben kör topal eklemiştim, bir hata çıkmıştı, qt ile ilgilenen elemanın cevabı, bu arada ben osx de çalışıyordum ...

Field tipi değiştir, readonly sini false yap, verdiği hataya göre işlem yap.

"CheckListBox1 daki Moduller" modül ne? böyle bir property bildiğim kadarıyla yok. Kastetdiğin string ise içerik burda CheckListBox.Items[]

for r := 0 to Memo1.Lines.Count - 1 do
begin
KayitBul := Memo1.Lines.Strings[ r ];
CheckListBox1.Checked[r]:= (KayıtBul burada CheckListBox.Items[] varsa);

Memo1.Text de 8 kayıt var bu kayıtları nasıl bulabilirim? Aşağıdaki kod 12 kayıt kadar dönüyor ve bu 8 kayıdın karşılığını CheckListBox1 de işaretlemek istiyorum.


procedure TForm1.Memo1DblClick(Sender: TObject);
Var
KayitBul:String;
r :Integer;
begin
If Edit4.Text=KayitBul Then
Begin
Memo1.Text ...