Вопрос по поводу записей (Record)

[werser]

Как зоздать запись (Record) которая хранит путь к файлу открытом в компоненте image с помощью opendialog - а? Помогите пожалуйста срочно нужно!

[bill]

1. Я не знаю зачем нужен здесь record. Помойму проще сделать просто var s:string;
begin ..... s:=opendialog1.filename - для примера если файл находился с:\rr.bmp то в s будет как раз с:\rr.bmp .
Но если вам нужен именно record то просто проще сделать так:

type ta=record
first:string;
all:string;
end;
var a:ta;
потом a.all:=openpicturedialog1.filename; (тут также как и для стринга)
а в a.first:=само имя файла. Для этого нужно сделать простой цикл.
q:=0;cc:='\';a.first:=a.all;
for i:= length(a.all) downto 1 do
if (q<1) and (a.first[i]=c) then begin e:=i;q:=q+1; end;
delete(a.first[i],1,e);
2. Лучше использовать openpicturedialog

[werser]

Там просто программа с записями типа чё то база данных и сохраняетса кроме характериситик картинка как сделать что б одна из записей хранила картину, а именно путь к ней???

[Jeni]

[quote=werser;25276]
Там просто программа с записями типа чё то база данных...
Нужны записи (конструкции языка record) или записи базы данных? Это совершенно разные вещи.

Сообщение от werser

...что б одна из записей хранила картину, а именно путь к ней???

Так всё-таки что нужно хранить: картинку или путь к ней? Или и то, и другое? (и можно без хлеба)
В первом случае (картинка) это двоичные данные, а во втором - строка.

[werser]

[quote=Jeni;25292]

Сообщение от werser

Там просто программа с записями типа чё то база данных...
Нужны записи (конструкции языка record) или записи базы данных? Это совершенно разные вещи.


Так всё-таки что нужно хранить: картинку или путь к ней? Или и то, и другое? (и можно без хлеба)
В первом случае (картинка) это двоичные данные, а во втором - строка.

Нужни конструкции record!!! Нужен путь к к картинке (строка)!!!!

[werser]

Нада созранять в записе путь к картинке. Для того чтобы после
сохранения можно было автоматически загружать её в Image а путь ,к ней, брать из файла

[bill]

так, все прояснилось. насколько понял то должна загружаться последняя картинка.
поэтому файл надо открыть для чтения, переписав старый файл -rewrite(f). Я обычно всегда сначала пользуюсь assignfie а потом rewrite.
а потом пишем writeln(f,a.all).
f:textfile, a.all- ваш record который добавляется в новый файл. Должно быть примерно так.

[werser]

Всеравно не работает! Мне нужно просто сохранить в запись pyt (название) путь к тому файлу который я с помощью диалога добавил в имейдж! А

[werser]

нужен путь !

[werser]

Всеравно не работает! Мне нужно просто сохранить в запись pyt (название) путь к тому файлу который я с помощью диалога добавил в имейдж! А то что ты мне предложил не работает не хохраняет в файл путь! не знаю почему