com.c

来自「myTemp is used to connect PalmOS PDAs to」· C语言 代码 · 共 43 行

#include <PalmOS.h>

#include "com.h"

MemPtr SetFieldTextFromHandle(UInt16 fieldID, MemHandle txtH)
{
	MemHandle	oldTxtH;
	FormPtr		frm = FrmGetActiveForm();
	FieldPtr	fldP;
	
	fldP = FrmGetObjectPtr(frm, FrmGetObjectIndex(frm, fieldID));
	ErrNonFatalDisplayIf(!fldP, "missing field");
	oldTxtH = FldGetTextHandle(fldP);
	
	FldSetTextHandle(fldP, txtH);
	FldDrawField(fldP);
	
	if (oldTxtH)
		MemHandleFree(oldTxtH);
		
		return fldP;
}

FieldPtr	SetFieldTextFromString(UInt16	fieldID, Char* strP)
{
	MemHandle	txtH;
	
	txtH = MemHandleNew(StrLen(strP) + 1);
	if (!txtH)
		return NULL;
		
	StrCopy(MemHandleLock(txtH), strP);
	
	MemHandleUnlock(txtH);
	
	return SetFieldTextFromHandle(fieldID, txtH);
}

void ClearFieldText(UInt16 fieldID)
{
	SetFieldTextFromHandle(fieldID, NULL);
}