Hatena::ブログ(Diary)

るびゅ備忘録 このページをアンテナに追加 RSSフィード


08/01/2008

segTVのソースをふにふにするが目的は達せず

Monster TV HDUSとICリーダーが揃ったのでちょこっと遊んでみた

delphiなんて初めて触った

明日には忘れそうなのでメモ


必要なランタイムとかインストール後、turbo delphi explorerインストール、メールで送られてくるライセンスをユーザーディレクトリ


dprファイルがプロジェクトなのでSegTV.dprを開く


  • 今日やったこと

ip1|ip2 みたいに並べてiniに設定して、複数にUDP配信できないかなーと試したがうまくいかなかった


line9

isp3,

line21

IdUDPClient1: TIdUDPClient;

コンポーネントが無くてコンパイル通らない&使われてないのでコメントアウト


line109

INI.WriteString ('Setting','Address'    ,FUDPAddr    );

コメントアウト


line211

SegTuner_SendUDP(SegTuner_ChannelToFreq(ChNum,ChFlg),True,5,PChar(UDPAddr),UDPPort,SegHandle);

While Pos('|',UDPAddr)<>0 do
begin
   SegTuner_SendUDP(SegTuner_ChannelToFreq(ChNum,ChFlg),True,5,PChar(Copy(UDPAddr,1,Pos('|',UDPAddr) - 1)),UDPPort,SegHandle);
   UDPAddr := Copy(UDPAddr,Pos('|',UDPAddr) + 1,Length(UDPAddr));
end;
SegTuner_SendUDP(SegTuner_ChannelToFreq(ChNum,ChFlg),True,5,PChar(UDPAddr),UDPPort,SegHandle);

  • 追記

http://mobilehackerz.blogspot.com/

作者様のblog

SegTuner_SendUDPを呼んでHandleを受け取るだけでUDP送信が始まります。MaxTimeoutに設定した秒数が経過すると自動的に止まってしまうので(ウォッチドグタイマというか)止まらないよう定期的にHandleを引数にしてSegTuner_UpdateTimeoutを呼び出してください。そして終わったらSegTuner_Stop。

と書かれててめっさ原因が判明したので来週にでもやろう…

スパム対策のためのダミーです。もし見えても何も入力しないでください
ゲスト


画像認証

トラックバック - http://d.hatena.ne.jp/ruby-U/20080801/1217597337