2chBrowser OpenJane@Win板 Part20

このエントリーをはてなブックマークに追加
336名無し~3.EXE
2ちゃんの引用付きレスの余分な半角spもじゃまなので
これで良いかな?
WriteTextとWriteBRを分けても良いけど

constructor TStrDatOut.Create;
(略)
FBiteSpaces:=False;

function TStrDatOut.ProcBlank: boolean;
begin
//RC2のTDat2PopupView.ProcBlankと同じ
end;

procedure TStrDatOut.WriteText
(略)
if str^ =#13 then
FBiteSpaces:= True;

TPopupViewItemもRC2で余分な半角SP消してるしこの位が好みかな
Dec(Point.X, 16);
DD_OFFSET_LEFT div 2;