GitHub Sale: sign up for any paid plan this week and pay nothing until January 1, 2009!  [ hide ]

public
Description: a tiny graphical app kit for ruby
Homepage: http://code.whytheluckystiff.net/shoes
Clone URL: git://github.com/why/shoes.git
 * shoes/native/windows.c: added an ask-secret dialog for windows.
why (author)
Tue Sep 16 11:02:28 -0700 2008
commit  a53cab98f191fa1480a7f370d5efad6a288e9ec7
tree    548870222bbbcc6dd2a24f44791cde317abe9918
parent  834c242a45a825371d5a7a13442bb6bedf065505
...
6
7
8
 
9
10
11
...
6
7
8
9
10
11
12
0
@@ -6,6 +6,7 @@
0
 #define SHOES_APPWIN32_H
0
 
0
 #define ASKDLG 1
0
+#define ASKSECRETDLG 2
0
 #define IDQUIZ 111
0
 #define IDQUED 112
0
 
...
15
16
17
 
 
 
 
 
 
 
 
 
 
 
...
15
16
17
18
19
20
21
22
23
24
25
26
27
28
0
@@ -15,3 +15,14 @@ BEGIN
0
   CONTROL "&Cancel",IDCANCEL,"BUTTON",BS_PUSHBUTTON |WS_CHILD |WS_TABSTOP |WS_VISIBLE ,248,58,40,14
0
 END
0
 
0
+ASKSECRETDLG DIALOG 20, 20, 299, 79
0
+STYLE DS_SETFONT |DS_MODALFRAME |WS_POPUP |WS_VISIBLE |WS_SYSMENU |WS_CAPTION
0
+CAPTION "Shoes asks:"
0
+FONT 8, "MS Shell Dlg"
0
+BEGIN
0
+ CONTROL "Question",IDQUIZ,"STATIC",SS_LEFT |WS_CHILD |WS_VISIBLE ,8,8,279,30
0
+ CONTROL "",IDQUED,"EDIT",SS_LEFT |WS_CHILD |WS_TABSTOP |WS_BORDER |WS_VISIBLE |ES_PASSWORD,8,40,279,12
0
+ CONTROL "&OK",IDOK,"BUTTON",BS_DEFPUSHBUTTON |WS_CHILD |WS_TABSTOP |WS_VISIBLE ,200,58,40,14
0
+ CONTROL "&Cancel",IDCANCEL,"BUTTON",BS_PUSHBUTTON |WS_CHILD |WS_TABSTOP |WS_VISIBLE ,248,58,40,14
0
+END
0
+
...
1401
1402
1403
1404
 
1405
1406
 
 
1407
1408
1409
1410
 
 
1411
1412
1413
...
1401
1402
1403
 
1404
1405
 
1406
1407
1408
1409
1410
 
1411
1412
1413
1414
1415
0
@@ -1401,13 +1401,15 @@ shoes_dialog_alert(VALUE self, VALUE msg)
0
 }
0
 
0
 VALUE
0
-shoes_dialog_ask(VALUE self, VALUE quiz)
0
+shoes_dialog_ask(int argc, VALUE *argv, VALUE self)
0
 {
0
- VALUE answer = Qnil;
0
+ VALUE quiz, attr = Qnil, answer = Qnil;
0
+ rb_scan_args(argc, argv, "11", &quiz, &attr);
0
   GLOBAL_APP(app);
0
   quiz = shoes_native_to_s(quiz);
0
   win32_dialog_label = RSTRING_PTR(quiz);
0
- int confirm = DialogBox(shoes_world->os.instance, MAKEINTRESOURCE(ASKDLG),
0
+ int confirm = DialogBox(shoes_world->os.instance,
0
+ MAKEINTRESOURCE(RTEST(ATTR(attr, secret)) ? ASKSECRETDLG : ASKDLG),
0
     APP_WINDOW(app), shoes_ask_win32proc);
0
   if (confirm == IDOK)
0
   {

Comments

    No one has commented yet.