I'm trying to make a gui interface to a command-line program I have. The
problem is that at certain points, the program wants user input. I tried
backticks, but my script hangs at the point where the program wants input.
Is there a way to interface with DOS so that when a DOS program wants in
Here's the code that you all helped me to figure out. You can use this to
implement a clickable URL in your About Window, or whereever you like. The
code may not be very clean, let me know if you have suggestions to improve
this. This example runs as-is.
Aldo - any way to build all this in to the
it was the -notify option that I needed to make it clickable.
Thanks!
-
Tim Thomas
Unix Systems Administrator
Lockheed Martin EIS · Denver Data Center
303-430-2281
mailto:[EMAIL PROTECTED]
There's not really much too it. But here it is:
# Creates the label for the About "button"
$MAIN->AddLabel(
-name => "About",
-notify => 1,
-bitmap => 1,
-top=> $top,
-left => $left,
-width => $width,
-height => $height,
);
sub About_Click {
Help_About_Click();
}
This c
Try $FTPInfo = $ftp->message();
-Original Message-
From: Erick J. Bourgeois [mailto:[EMAIL PROTECTED]
Sent: Friday, January 19, 2001 4:15 PM
To: perl-win32-gui-users@lists.sourceforge.net
Subject: [perl-win32-gui-users] Net::FTP with AddStatusBar()
Sorry, here is the sub for connecting
Sorry, here is the sub for connecting to an FTP server
sub CmdConnect_Click {
my $FTPInfo;
$Textbox->Text("Connecting to $Host");
if ($ftp = Net::FTP->new($Host, Timeout => 45, Debug =>
1)) {
$FTPInfo = Net::Cmd::message(); #Problem
lies here, it just stops
I think It may be time for you to start submitting some code to us.. It's a
lot easier to give advice when you see a whole block of code...
-Original Message-
From: Erick J. Bourgeois [mailto:[EMAIL PROTECTED]
Sent: Friday, January 19, 2001 3:46 PM
To: perl-win32-gui-users@lists.sourcefo
sorry ->message() is method
The program stalls when it tries to read from the STDOUT.
I was looking at the docs, Net::Cmd, and there is a
ion ->message(), however, it stalls there as well,
waiting.
->message() returns the text message returned from the last
command . Don't get it?
I have created a text box using
$dialog3->AddTextfield(
-name => "dialog3text3",
-left => $dialog3->ScaleWidth-470,
-top => $dialog3->ScaleHeight-98,
-text => "$dialog3text3",
-width=> 460,
-height => 100,
);
Try adding '-multiline => 1,' to your
try tieing STDOUT to a scalar with IO:Scalar.
Here's an example (untested) that may point you in the right direction:
use IO::Scalar;
my $FTPInfo;
tie *STDOUT, 'IO::Scalar', \$FTPInfo;
print "line 1\nline 2\n", "line 3\n";
$SB->Text($FTPInfo);
HTH,
[EMA
Christopher,
I believe you need to use the RichEdit control instead of the TextBox ( or
TextField ) control.
Felice
"christopher sagayam" <[EMAIL PROTECTED]> on 01/19/2001 12:19:00 PM
Please respond to perl-win32-gui-users@lists.sourceforge.net
To: perl-win32-gui-users@lists.sourceforge.n
I have created a text box using
$dialog3->AddTextfield(
-name => "dialog3text3",
-left => $dialog3->ScaleWidth-470,
-top => $dialog3->ScaleHeight-98,
-text => "$dialog3text3",
-width=> 460,
-height => 100,
);
when I press ENTER key in the text box
Yes just disable it using
->Disable()
chris
www.perl-resume.com
- Original Message -
From: Erick J. Bourgeois
To: perl-win32-gui-users@lists.sourceforge.net
Sent: Friday, January 19, 2001 10:28 PM
Subject: [perl-win32-gui-users] Greyed Controls
Is it possible to "grey o
Is it possible to "grey out" a control (user can not change it, but he/she can
see it, like a DUN). I have tried many options and can not find the answer.
erick
Never Stop Questioning
www.jeb.ca
Jeremy - can you post your code that uses it?
Thanks,
Tim
-
Tim Thomas
Unix Systems Administrator
Lockheed Martin EIS · Denver Data Center
303-430-2281
mailto:[EMAIL PROTECTED]
-
Erick,
I'm convinced that there must be a simple way
to do this but, I've tried everything I can think of
but haven't found it yet.
The PerlDocs seemed to suggest using Forks,
Pipes and/or IPC, but this will probably be
abit more complicated than you want. You
could redirect STDOUT (and/or STDER
17 matches
Mail list logo
