I want to be able to change the Label on a Popup Trigger. With the code
below, nothing happens. What am I missing?
Todd
var
Form: FormPtr;
List: ListPtr;
Control: ControlPtr;
ListIndex: UInt16;
PopupIndex: UInt16;
P: MemPtr;
begin
...
PopupIndex := FrmGetObjectIndex(Form, PopuptriggerVariety);
Control := ControlPtr(FrmGetObjectPtr(Form, PopupIndex));
if Control <> nil then
begin
FrmCustomAlert(AlertError, 'Got Control ptr', '', '');
//Nothing happens to the control!!
CtlSetLabel(Control, 'Test');
end else
FrmCustomAlert(AlertError, 'Control ptr = nil', '', '');
...
end;
--
Todd Cary
Ariste Software
[EMAIL PROTECTED]
--
For information on using the Palm Developer Forums, or to unsubscribe, please see
http://www.palmos.com/dev/tech/support/forums/
