- 论坛徽章:
- 0
|
use Win32::GUI;
use Win32::GUI::DropFiles;
$main = Win32::GUI::DialogBox->new(
-name => 'Main',
-width => 400,
-height => 70,
-topmost => 1,
-acceptfiles => 1,
-onDropFiles => \&Ondrop,
-toolwindow => 1,
);
$main->AddTextfield(
-name => "InputLine",
-pos => [ 5, 10 ],
-size => [ 385, 20 ],
);
sub Ondrop {
my ($self, $oDrop) = @_;
$main->InputLine->Text($main->InputLine->Text().' '.$oDrop->GetDroppedFile());
}
$main->Show();
Win32::GUI::Dialog();
|
把中文字直接輸入到Textfield是不會出現亂碼的,
但是,經過DropFiles把含中文字的路徑的文件(例如"桌面"上的文件)加到Textfield時,
就會出現亂碼.
到底原因在那? |
|