Delphi Forum

Bu iki yazıyı incele

https://learn.microsoft.com/en-us/sql/t-sql/language-elements/raiserror-transact-sql?view=sql-server-ver16

https://www.mssqltips.com/sqlservertip/7439/sql-raiserror-error-handling-code-execution/

Kullanımıda sanırım şöyle
RAISERROR('Oh no! Something bad just happened!', 16 ...

Aslında FieldByName kullanımı döngülerde tavsiye edilmez. .....

Benim başıma geçmişte bu konuyla ilgili hata çıkmıştı ve epey bir vakit kaybettirmişti, hata, döngü içinde TField tipli değişkene (DesignTime da IDE tarafından tanımlanan) atama yapılmamasıydı. FieldByName ise beni yanıltmadı ...

OnCalcFields event i, Her field ve her satır için tekrarlanır, yani çok fazla tekrar ve buradaki çok işlem performans kaybıdır.
if MEMTABLE_RENK.Active= False then MEMTABLE_RENK.Active:= True;
Son derece gereksiz bir satır. "MEMTABLE_RENK" bir değişken, bunu sürekli kontrol etmek yersiz. İllaki ...

memtable yerine Calculated veya Computed field lada yapılabilir

Delphi welcome Page i ile ilgili burayı inceleyebillirsiniz

https://stackoverflow.com/questions/540 ... lcome-page

Aklıma gelen ilk basit yöntem, Bulduğun renklendirme kodlarına göre, iki değişken kullan, birinde renk bilgisi diğerinde ise ardışıklığı neyle sağlıyorsan (Numara yada id) yi sakla. her satır basıldığında, elindeki değişkenle satırdaki değişkeni karşılaştır, farklı ise renk ve bu değişkeni ...

Bence yazım hatan yok, kurgu hatan var. RadioButton lar gruplanmış mı? öyleyse, ilk üç RadioButton aynı grupta ise, üçünün de seçilme ihtimali yok bu yüzdende o "if" in sonucu hep False tır, yani ELSE çalışır.
İlk if bloğu diyelim ki True, yani Then çalıştı. Altındaki if bloğu çalıştığında ve oda ...

- Sence bu kod mantıklı mı? dikkat et, soru doğru yazılmış mı? değil.
while sayi1 + sayi2 > 100 do begin
sayi1 := Random(100);
sayi2 := Random(100);
end;


Kod 100 ve altında toplam üretmek için tasarlanmış gibi duruyor. Optimize mi konusu tartışılır. Ancak hatalı olup olmadığı konusu ...

- Çok kod yazmak iyi ve doğru kod yazmak değildir. Akla gelenin yazmak kod yazmak değildir, sade ve basit yazmak işlemleri ve hata ayıklamayı kolaylaştırır.

Hocam ben de isterdim hatasız kodlaya yazabilmeyi, ama bilgi düzeyimi fark etmişsinizdir. O zaman kod yazma diyebilirsiniz tabi ki ama ben ...

Tavsiyelerim:
- Çok kod yazmak iyi ve doğru kod yazmak değildir. Akla gelenin yazmak kod yazmak değildir, sade ve basit yazmak işlemleri ve hata ayıklamayı kolaylaştırır.
case RadioGroup1.ItemIndex of
0: begin
// Her iki olasılıkta da aynı kod varsa neden "case RadioGroup1.ItemIndex of" burda ...

google da "delphi tfdmemtable example" aratabilirsin

https://docwiki.embarcadero.com/CodeExa ... ain_Sample

işlemleri neden fastreport a yıkıyorsun? Hesapla vs işleri delphi de yapyırt. Mesela memtable kullan, field lar üzerinde istediğin işlemi yapmam daha kolay. Fastreport a yaptırtmak gereksiz ve mantıksız. Fazladan kod yazmaya ve fazla işlem yükü demek. Fastreport u sadece yazıya aktarma işlemi için ...

Amacın tam olarak ne anlamadım. Karşı program dediğin senin yazdığın bir program mı? comm port demişsin ama bilgi alışverişinden bahsediyorsun, o zaman neden comm port? tcp olur mesela. Amaç iki program arasında bilgi aktarımı, bir cihaz değil sanırım.

https://www.delphiturkiye.com/forum/vie ... 42#p182842
https://www.delphiturkiye.com/forum/vie ... eateColumn#
https://stackoverflow.com/questions/261 ... at-runtime