Автор: Smak (11.04.2007 в 20:10)
Эту функцию я пробовал но у меня не вышло - проблему описал под кодом
#include <vcl.h>
#pragma hdrstop
#include <process.h>
#include "Unit1.h"
#pragma package(smart_init)
#pragma resource "*.dfm"
TSE *SE;
__fastcall TSE::TSE(TComponent* Owner)
: TForm(Owner)
{
}
void __fastcall TSE::FilesChange(TObject *Sender)
{
Filename->Text = Files->FileName;
}
void __fastcall TSE::DriveChange(TObject *Sender)
{
Dir->Drive = Drive->Drive;
}
void __fastcall TSE::DirChange(TObject *Sender)
{
Files->Directory = Dir->Directory;
}
void __fastcall TSE::OpenClick(TObject *Sender)
{
if(Filename->Text == "")
{
SE->Close();
}
//execlp("","",NULL);
}
|
У меня путь и имя файла могут идти от TEdit-a и TFileListBox-a там выходит AnsiString а надо Char. Превратить одно в другое и заставить работать не удалось увы.