I thought "That's it" But it did not affect...I set DefaultNodeHeight to default this time. See the lines with Kanji are lower than other?
DrawText(Canvas.Handle, PChar(Data^.Column0), Length(Data^.Column0), R, DT_LEFT or DT_VCENTER or DT_SINGLELINE);
DrawText(TargetCanvas.Handle, PChar(Data^.Column0), Length(Data^.Column0), R, DT_LEFT or DT_VCENTER or DT_SINGLELINE);