Cas Terazi Veri gönderimi Delphi sürüm sorunu

[KUNTAY]

(09-12-2021, Saat: 11:35)mrmarman Adlı Kullanıcıdan Alıntı: Delphi 2005'de sorunsuz çalışıyor demişsiniz ya, bunu fırsat bilip teraziye giden ve gelen içeriği Delphi 10.3 vb de giden ile karşılaştırmak isterseniz buraya ikisini de yazın dönüşüm konusunda yardımcı olalım.

Projeyi 2005 ile bitirdiğim için hiç kurcalamamıştım ama galiba başka arkadaşlarında işine yarayabilir düşüncesi ile dediğinizi yapıp içeriği buraya yazim sizinde yardımınızla herkesin yararlanmasını sağlarız.

---

(11-12-2021, Saat: 12:28)sabanakman Adlı Kullanıcıdan Alıntı: UniCode olan Delphi 10.3 sürümü için bir de şunu deneyebilir misiniz?

1 - CASPRTC.pas dosyasında Ctrl+R ile "replace" penceresinde "Char" aratıp "AnsiChar" ile değiştirin. Bu hem Char tiplerini AnsiChar yapacak hem de PChar tiplerini PAnsiChar yapacaktır. Kısacası bu unit (CASPRTC.pas) içinde hiç Char ya da PChar tipinde değişken tanımı bırakmamış olmak gerekiyor.

2 - Unit1.pas dosyasında ise

function StrToPAnsiChar(const S: string): PAnsiChar;
var
  asVal: AnsiString;
begin
  asVal := AnsiString(S);
  Result := PAnsiChar(asVal);
end;

şeklinde bir fonksiyon tanımlayın ve tüm "PChar(" ile yapılan dönüşümleri "StrToPAnsiChar(" olarak değiştirin. Bu unit (Unit1.pas) içinde de hiç PChar(..) şeklinde tip dönüşümü bırakmamış olmak gerekmektedir.

Test etme imkanı bulamadım ama bu iki adımlı değişiklikten sonra delphi 10.3 üzerinden de çalışması gerekiyor gibi duruyor .

Bu hafta sonuna kadar terazi üzerinde canlı bir test yapıp sonucu burdan yazarım sonuç olumlu olursa düzenlediğim paketi internette bir alana yükler linkini paylaşırım.