RectangleType bounds; FrmPtr frmP = FrmGetActiveForm ();
WinGetBounds (FrmGetWindowHandle(frmP), &bounds);
WinGetDrawWindowBounds (&bounds);
TblSetItemStyle (table, row, 0, type);
WinGetBounds (FrmGetWindowHandle(FrmGetActiveForm ()), &bounds);
TblSetItemStyle (tableP, row, column, type);
TblSetRowHeight (table, row, height)
AND OR
PalmwareTips?
ウィンドウの境界を取得する
OS4.0以降では、 OS4.0以降のアプリをOS3.5に対応させるための変更点。ウィンドウ境界の取得方法
RectangleType bounds; FrmPtr frmP = FrmGetActiveForm ();
WinGetBounds (FrmGetWindowHandle(frmP), &bounds);
と書くところを、 とする。(OS4.0以降でも使用可)Table
TblSetItemStyle (table, row, 0, type);
のtypeの部分。 行の高さを11pixels未満にするためには「tallCustomTableItem」を指定する必要があるが、OS3.5ではこれが使えないため、代わりに「customTableItem」を指定。 ちなみに、OS4.0以降では次のようにすることも出来るが、OS3.5ではエラーになる。WinGetBounds (FrmGetWindowHandle(FrmGetActiveForm ()), &bounds);
PEG-N700CのようにOS3.5のハイレゾ機種では、スモールフォントで表示出来ても、テーブルの行の高さはスタンダードフォントと同じになってしまうため、間が抜けてしまう。Table Item Type
TblSetItemStyle (tableP, row, column, type);
のtypeの部分に、OS3.5以前では「tallCustomTableItem」を指定できない。蛇足
TblSetRowHeight (table, row, height)