
25.11.2011, 23:05
|
Прохожий
|
|
Регистрация: 28.10.2011
Сообщения: 36
Репутация: 10
|
|
Код:
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls, jpeg, ComCtrls;
type
TForm1 = class(TForm)
ListBox1: TListBox;
Image1: TImage;
procedure ListBox1Click(Sender: TObject);
private
{ Private declarations }
public
FileName: String;
{ Public declarations }
end;
ндаа..что-то на этот раз совсем туплю...где написать?
|