掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
StringGridの内容をHTMLに変換するには? (ID:14248)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Googleで検索でもすると引っかかると思いますが、簡単なのでサンプル書いてみました。 //Color->HTML Color function TForm1.ColorToHTMLStr(AColor: TColor): string; var cint :DWORD; r,g,b:Byte; begin cint:=ColorToRGB(AColor); r:=Byte(cint); g:=Byte(cint shr 8); b:=Byte(cint shr 16); Result:=IntToHex(r,2)+ IntToHex(g,2)+ IntToHex(b,2); end; procedure TForm1.Panel1Click(Sender: TObject); var AColor:TColor; begin AColor:=Panel1.Color; Caption:=ColorToHTMLStr(AColor); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.