Intraweb(200)

  • 主题发起人 主题发起人 JamesBond_L
  • 开始时间 开始时间
J

JamesBond_L

Unregistered / Unconfirmed
GUEST, unregistred user!
有沒有人知道有沒有地方可以處理Intraweb在最終輸出的HTML,比如現在輸出的HTML內容是簡體的,我轉換成繁體到流覽器。或者有沒有方法可以讓Intraweb輸出UTF-8或者Unicode編碼的HTML?注:D7自帶的Intraweb。
 
哈哈,知道怎麼搞了,好像處理比較完美的,原來GenerateForm是可以重載的: TfrmBase = class(TIWAppForm) private public procedure GenerateForm(AStream: TStream); override; end;procedure TfrmBase.GenerateForm(AStream: TStream);var stream: TStringStream; s: string;begin inherited; stream := TStringStream.Create(''); try AStream.Position := 0; stream.CopyFrom(AStream, AStream.Size); s := stream.DataString; stream.Size := 0; stream.WriteString(AnsiToUtf8(s)); stream.Position := 0; AStream.Size := 0; AStream.CopyFrom(stream, stream.Size); finally stream.Free; end;end;
 

Similar threads

I
回复
0
查看
800
import
I
I
回复
0
查看
876
import
I
I
回复
0
查看
656
import
I
I
回复
0
查看
775
import
I
后退
顶部