|
ｿｽ@ｿｽｿｽｿｽ鞫懶ｿｽ^ｿｽOｿｽﾌ取得
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
ｿｽﾟゑｿｽｿｽ 2005/08/18(ｿｽｿｽ) 19:15:43
ｿｽｿｽｿｽｿｽﾉゑｿｽｿｽﾍでゑｿｽｿｽB
memo1ｿｽﾉゑｿｽｿｽｿｽHTMLｿｽﾌソｿｽ[ｿｽXｿｽｿｽｿｽｿｽ鞫懶ｿｽ^ｿｽO(<img src=****>)ｿｽﾌアｿｽhｿｽｿｽｿｽXｿｽﾌ包ｿｽｿｽｿｽｿｽﾌみゑｿｽ
listboxｿｽﾉ取得ｿｽｿｽｿｽｿｽﾉは、ｿｽﾇのようｿｽﾉ行ｿｽｿｽｿｽﾎゑｿｽしｿｽｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽｿｽｿｽｿｽｿｽﾝゑｿｽｿｽｿｽ 2005/08/22(ｿｽｿｽ) 08:47:40
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽforｿｽﾅ捜ｿｽｿｽｿｽｿｽｿｽﾄ、ｿｽnｿｽｿｽｿｽﾉ費ｿｽｿｽｿｽｿｽoｿｽｿｽｿｽｿｽｿｽｿｽｿｽvｿｽｿｽｿｽﾂゑｿｽｿｽﾜゑｿｽｿｽｿｽﾋ。
// ｿｽｿｽｿｽｿｽｿｽｿｽ s, addr ｿｽｿｽｿｽl i bool b ｿｽｿｽ骭ｾ
s := memo1.text;
b := false;
for i := 1 to Length(s) do
begin
if(s[i] = '"') b := !false;
if(b) addr := addr + s[i];
end;
ｿｽ@Delphiｿｽﾌ包ｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ忘ｿｽｿｽﾄゑｿｽｿｽﾄゑｿｽﾌで、ｿｽﾗゑｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽﾍ趣ｿｽｿｽｿｽｿｽﾅ抵ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
