Delphi Forum

@sabanakman

Açıklayıcı güzel yorum için teşekkür ederim. Bir RoundTo'luk işi varmış. Sayenizde hallettim. Sağ olun...

Merhaba arkadaşlar.

Polar koordinat sisteminde yarı çapını ve açısını bildiğim bir noktanın orijine uzaklığını x,y olarak bulmak istiyorum. Programdaki amaç kaç adet nokta olursa olsun bunların x ve y cinsinden uzaklıklarının string gride yazılması. Mesela kullanıcı yarı çap 20, nokta adedi 10 ...

PNG resmini component olmadan ekleyebiliyorsun kardeşim. Imagelist'e resimleri ekleyip, imagelist'in colordept özelliğini resmine uygun olana değiştir (%99 ihtimalle 32 bit). Bunu uygun değere getirmemen; resim kalitesi, şeffaflık gibi bir çok özelliği etkiler. Yoksa benim gibi gereksiz yere 3 gün ...

Komik gelebilir ama port yazmadan direkt ip adresi yazınca ne oluyor?

unable to connect to 192.168.2.105:5555:5555

Hatası alıyorum :-/

Sanırım port numarasının iki kez yazılmasından kaynaklanıyor. Android cihazda uygulamanın size verdiği IP adresini 192.168.2.105:5555 şeklinde dener misiniz?

Android cihazın bilgisayar bağlantısında sorun var mı? İnternet ...

Androidapi.Helpers'i yanlış kullanıyormuşum. Teşekkür ederim baristalay.

@baristalay

Sorunuma en yakın başlık bu idi. Yeni bir başlık açmadan buradan devam edeyim dedim.

Buradaki örnekte Androidapi.Helpers kullanılmamış fakat internette bulduğum örneklerde projeye eklemem gereken bir uses olarak verilmişti. Yine StringToJString ifadesi tüm örneklerde vardı. Bu uses'ı ...

Kullandığınız Uses'ları yazdım. Send SMS iznini verdim. Yazdığınız Prosedürü uyguladığımda "StringToJstring" kısmında sorun yaşıyorum. İnternette SMS gönderme ile ilgili yazılan makalelerin tümünde "StringToJString" kısmında sorun yaşıyorum. Geçmişte XE5 ile yaptığım uygulama SMS gönderebiliyor ...

Dosya ismi ile ilgili bir hata gibi görünüyor. Sadece İngilizce karakterlerden oluşan bir isim verir misiniz?

Android işletim sistemi olan cihazların kablosuz bağlantısını, USB kablomu kaybedince keşfettim. Umarım birilerinin işine yarar. İnternette bu işlem için cihazın daha önce USB kablosu ile bir defaya mahsus olarak bilgisayara bağlanıp, geliştirici seçeneğinin açılması gerektiğinden bahsediliyor ...

Evet. Datamodule'ü yeninden yaptığımda sorunu çözdüm. Teşekkürler freeman35.

procedure TForm1.lbledt1Change(Sender: TObject);
begin
if lbledt1.Text <> '' then
begin
with datamodule.DM.ibqry2 do
begin
Close;
SQL.Clear;
SQL.Add('Select * from ONEMLI where ISIM like ' +
QuotedStr('%' + lbledt1.Text + '%'));
Open;
end;
end
else
begin
if lbledt1.Text = '' then ...

Çalışan bir programı child olarak delphi'de açma ve delphi'nin her zaman üstte kodlarının birleşimi ile oluşmaktadır. Bu iki parça kodda alıntıdır. Excel'e manuel olarak aktarmam gereken veriler için çok yardımcı oldu. Belki birilerinin işine yarar.

procedure TForm1.Button1Click(Sender: TObject ...

Akınsoft'ta aynı mantığı kullanıyor. Lisans hem internet üzerinden hem de telefonla yapılabiliyor. Aynı zamanda internetten programı lisanslı mı diye kontrol ediyor. İnternet kullanımı mecburi değil.

En kesin yol bana göre şudur. Programcı lisans aldığı tarihi not edip ya yüz yüze ya da telefonla ...

Program hangi sektör üzerine? Ne iş yapıyor bu program?