Форум: "Основная";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];
Вниз?????????? Найти похожие ветки
← →
Svetka* © (2004-04-28 20:19) [0]Удалено модератором
Примечание: Правила читаем
← →
Игорь Шевченко © (2004-04-28 20:24) [1]
> что девушке это совсем не нужно…
совсем не это нужно...
А что, мальчиков в институте не получается разжалобить ?
← →
Gero © (2004-04-28 20:25) [2]
> Необходимо создать меню в нём 2 кнопок
В стандартном меню нет кнопок.
> корневого каталога нужного диска в определённый каталог
> другого диска
Как определять какой диск нужный?
> после этого переписывать файл из корневой директории
Где взять имя файла?
Я бы тебе написал, но у меня в Delphi проект открытый, а закрывать-открывать снова влом.
← →
Svetka* © (2004-04-28 20:35) [3]Я сделала форму с кнопками, а как, например, из C:\ переписать в D:\rrr\ (при нажатии) не знаю...
← →
Svetka* © (2004-04-28 20:37) [4]файл любой
← →
Gero © (2004-04-28 20:46) [5]Переписать - CopyFile, DeleteFile
При нажатии - Button.OnClick
← →
YurikGl © (2004-04-28 20:48) [6]Svetka* ©
E-mail: mpm@inbox.ru
Лучше попроси, что-бы тебе решение на мыло отослали, а то заблокируют тебя админы.
← →
Svetka* © (2004-04-28 20:54) [7]unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure Button3Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button3Click(Sender: TObject);
begin
Close;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
А ЧТО ТУТ ПИСАТЬ? // Тут нужно переписать файл 1.txt из C:\ на D:\rrr\
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
А ЧТО ТУТ ПИСАТЬ? //А тут нужно что-бы случайное число получалось и создавалась папка с именем этого числа, в которую писался всё тот же файл...
end;
end.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.047 c