diff Mac/scripts/EditPythonPrefs.py @ 11624:3c213e372b22 legacy-trunk

Partially converted to Appearance, the dialog still has the old ugly layout and interaction.
author Jack Jansen <jack.jansen@cwi.nl>
date Thu, 23 Dec 1999 14:34:07 +0000
parents 71281ff8c6a2
children 99c9b126690d
line wrap: on
line diff
--- a/Mac/scripts/EditPythonPrefs.py	Thu Dec 23 14:33:20 1999 +0000
+++ b/Mac/scripts/EditPythonPrefs.py	Thu Dec 23 14:34:07 1999 +0000
@@ -6,6 +6,7 @@
 from Dlg import *
 from Events import *
 from Res import *
+import Controls
 import string
 import struct
 import macfs
@@ -64,24 +65,24 @@
 def optinteract(options):
 	"""Let the user interact with the options dialog"""
 	d = GetNewDialog(OPT_DIALOG_ID, -1)
-	tp, h, rect = d.GetDialogItem(OD_CREATOR_ITEM)
-	SetDialogItemText(h, options['creator'])
-	tp, h, rect = d.GetDialogItem(OD_TYPE_ITEM)
-	SetDialogItemText(h, options['type'])
+	htext = d.GetDialogItemAsControl(OD_CREATOR_ITEM)
+	SetDialogItemText(htext, options['creator'])
+	htext = d.GetDialogItemAsControl(OD_TYPE_ITEM)
+	SetDialogItemText(htext, options['type'])
 	d.SetDialogDefaultItem(OD_OK_ITEM)
 	d.SetDialogCancelItem(OD_CANCEL_ITEM)
 	
 	while 1:
 		for name in opt_dialog_dict.keys():
 			num = opt_dialog_dict[name]
-			tp, h, rect = d.GetDialogItem(num)
-			h.as_Control().SetControlValue(options[name])
+			ctl = d.GetDialogItemAsControl(num)
+			ctl.SetControlValue(options[name])
 		n = ModalDialog(None)
 		if n == OD_OK_ITEM:
-			tp, h, rect = d.GetDialogItem(OD_CREATOR_ITEM)
-			ncreator = GetDialogItemText(h)
-			tp, h, rect = d.GetDialogItem(OD_TYPE_ITEM)
-			ntype = GetDialogItemText(h)
+			htext = d.GetDialogItemAsControl(OD_CREATOR_ITEM)
+			ncreator = GetDialogItemText(htext)
+			htext = d.GetDialogItemAsControl(OD_TYPE_ITEM)
+			ntype = GetDialogItemText(htext)
 			if len(ncreator) == 4 and len(ntype) == 4:
 				options['creator'] = ncreator
 				options['type'] = ntype
@@ -107,11 +108,12 @@
 	except os.error:
 		pass
 	d = GetNewDialog(DIALOG_ID, -1)
-	tp, h, rect = d.GetDialogItem(TITLE_ITEM)
-	SetDialogItemText(h, title)
-	tp, h, rect = d.GetDialogItem(TEXT_ITEM)
-##	SetDialogItemText(h, string.joinfields(list, '\r'))
-	h.data = string.joinfields(options['path'], '\r')
+	htext = d.GetDialogItemAsControl(TITLE_ITEM)
+	SetDialogItemText(htext, title)
+	ctl = d.GetDialogItemAsControl(TEXT_ITEM)
+	data = string.joinfields(options['path'], '\r')
+	ctl.SetControlData(Controls.kControlEditTextPart, Controls.kControlEditTextTextTag, data)
+
 	d.SelectDialogItemText(TEXT_ITEM, 0, 32767)
 	d.SelectDialogItemText(TEXT_ITEM, 0, 0)
 ##	d.SetDialogDefaultItem(OK_ITEM)