Dialer programı

[webaytek]

Sizin korkunuzdan uzun süre yeni konu açamamıştım
Allahın izniyle söyliicem ama hala korkuyorum
Ben Dialer yapmak istiyorum aman aman korkmayın sadece telefon maksatlı...
Bir müşteri takip programı falan üzerinde çalışıyordum uzun zamandır...
Bir 2 tane edit... 1.cisinde kod ikincisinde tel no yazıyor... yanında bir tuş edit2 içindeki numarayı aramalı ama aynı tuş içine bir de bağlantı kesme tuşu koymak da istiyorum...
Yani bana lazım olan modem üzerinden hatta bağlı olan telefon numarası çevirebilecek bir kod.

NOT : Konuyla ilgili detaylı bilgim olmadığından bana teoride olabilir diye geliyor ama olmaz derseniz ne önerirsiniz...

[lazio]

numarayı çevirmek kolay, modemin portunu açarak #AT kodlarıyla çevirebilirsin ancak daha sonra ne yapmak istediğin önemli..bahsedersen..

[webaytek]

edit 2 içinde yazan xxxyyzz gibi bir numarayı arayacak işte...
Adamın kulağında mikrofon+kulaklık... aranınca karşı tarafla konuşacak sadece bu ama #AT de ne ki???

[lazio]

ses gönderme alma için tapi kullanmalısın, karşı tarafı aramak yeterli olmaz. turbopower bileşenlerinde apro diye bir paket var demoları incele.
kolay gelsin

[mege]

C:\Program Files\Borland\Delphi7\tpapro_4_06\examples\delphi\Exauto.dpr
asenkron pro:)

karşı tarafı arayıp şifre soran doğruysa dosya gönderen bi örnek

Kod: Tümünü seç

(*
 This example will automatically logon and send/receive a file. If the Dial
 button was pressed, this will be the Client. If the Answer button was pressed
 this will be the Host. The Client logs in using the Password constant and the
 Host verifies the password. if everything checks out, the Client sends the
 file first, once that transfer is complete, the Host sends its file.

 The transfers are kept in sync by having the sender delay 1 second before
 sending, which gives the receiver enough time to prepare to receive.

 Host specific statements are preceded by { HOST }
 Client specific statements are preceded by { CLIENT }
*)

[webaytek]

neden ki ben windows'ta sadece kulaklık ve modem'imden diğer telefonlarla konuşabiliyorum...???

[lazio]

tamam işte sen görmeden tapi kullanıyorsun. tapi bir no çevirir, bağlantı durumunu kontrol eder, ses sönderir alır, bunları ses kartına yönlendirir vs. bu arada modem voice olmalı yoksa tapi çalışmıyor.

[webaytek]

mege abimin düşündüğü gibi bişiy diil...
Benim amacım sadece telefon görüşmesi yapacak olan hatta ait numaradan modem yardımıyla karşıdaki bir numarayi arayacak (ör ev numarası) ve konuşacak. işi bitince de tuşa basıp hattı kapatacak yani ahize olmadan windows üzerinden çevirmeli bağlantı programını kullanmak gibi bişiy ama ev veya cep numarasını arayacak...

Bu arada Lazio tşk. Comp.leri indirdim de evde denediğim zaman olmazsa haber veririm tşk.

[mege]

aramak için

Kod: Tümünü seç

procedure TForm1.btnDialClick(Sender: TObject);
begin
  CheckModem;
  btnDial.Enabled := False;
  btnCancel.Enabled := True;
  AdModem1.Dial(Edit1.Text);
end;

kapatmak için

Kod: Tümünü seç

procedure TForm1.btnCancelClick(Sender: TObject);
begin
  AdModem1.CancelCall;
  btnDial.Enabled := True;
  btnCancel.Enabled := False;
end;

[webaytek]

Yoroshiku onegai shimasu ustam ay pardon mege ustam şunu anlayamadım da kusura bakma bunlar componentler yüklendikten sonra içinden çıkan kodlar mı (yani bu btnDial, btnCancel, AdModem1 delphi içinde var mı)

[mege]

C:\Program Files\Borland\Delphi7\tpapro_4_06\examples\delphi\Exauto.dpr
asenkron pro:)

turbo power Async pro komponent setini kurduktan sonra içinde bulunan modem komponentini kullanmak için verilmiş örnek programdam kodlardır.

btnDial, btnCancel bildiğin buton apmodem ise paketteki modem bileşenidir.

iyi çalışamalar,

[webaytek]

dikkatsizliğimi mazur görün
Async pro yazısını görmemişim de - Çok tşk.