Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> проблема с работой с фалами, проблема с работой с фалами 
:(
    Опции темы
buian
Дата 29.3.2005, 15:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 37
Регистрация: 4.2.2005

Репутация: нет
Всего: нет
вот у меня проблема! делаю так(на http://ishodniki.ru взял):

Код

type
    TMember=record
    Name: string;
    email: string;
    soob: string;
    end;
var
    mas: array[1..50] of TMember;
    F: file of TMember;


дальше я ниче не делал - у меня выскачила ошибка в F: file of TMember;
ошибка: [Error] Unit1.pas(26): Type 'TMember' needs finalization - not allowed in file type

у меня Delphi 7

помогите -> я не ведь недавно начал дельфи

Это сообщение отредактировал(а) Alex - 29.3.2005, 16:40
PM MAIL   Вверх
Dr.No_xXx
Дата 29.3.2005, 16:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 215
Регистрация: 24.2.2005

Репутация: нет
Всего: нет
Дай более точную ссылку.Ну и закончи программу.
PM MAIL   Вверх
buian
Дата 29.3.2005, 16:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 37
Регистрация: 4.2.2005

Репутация: нет
Всего: нет
http://www.ishodniki.ru/base/Delphi/delphi...wn_database.zip

н шас попробую
PM MAIL   Вверх
Vit
Дата 29.3.2005, 16:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207
Так будет работать:
Код

type
TMember=record
Name: shorstring;
email: shorstring;
soob: shorstring;
end;
var
mas: array[1..50] of TMember;
F: file of TMember;



--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
buian
Дата 29.3.2005, 16:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 37
Регистрация: 4.2.2005

Репутация: нет
Всего: нет
smile отнюдь нет!

shorstring - [Error] Unit1.pas(20): Undeclared identifier: 'shorstring'
Добавлено @ 16:19
хехх! все надо зачем-то делать так:

type
Name: string[15];
.
.
.
.
.т.е указывать размер строки

всем спасибо кто что-то говорил по етому поводу
PM MAIL   Вверх
Vit
Дата 29.3.2005, 16:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207
извини, описка вышла - shortstring


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
buian
Дата 29.3.2005, 17:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 37
Регистрация: 4.2.2005

Репутация: нет
Всего: нет
ладно спасибо

Это сообщение отредактировал(а) buian - 29.3.2005, 17:53
PM MAIL   Вверх
Vit
Дата 29.3.2005, 17:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207
Способ первый...

Код

var t:TextFile;
...

AssignFile(t, 'c:\myfile');
rewrite(t);
writeln(t, OpenDialog1.FileName);
closefile(t);


Способ второй:

Код

With TStringlist.create do
  try
    text:=OpenDialog1.FileName;
    SaveToFile('c:\myFile'); 
  finally
    free;
  end;


А вообще DRKB тебе в помощь....


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
buian
Дата 29.3.2005, 17:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 37
Регистрация: 4.2.2005

Репутация: нет
Всего: нет
спасибо! я конечно бы скачал DRKB но щас с траффиком косяк(9 метров неоъото качать)! заватра скачаю


sorry! вот еще что! а как узнать домашний каталог(в котором exe лежит)! чтоб туда и сохранять!
PM MAIL   Вверх
Poseidon
Дата 29.3.2005, 19:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133
Цитата(buian @ 29.3.2005, 17:59)
sorry! вот еще что! а как узнать домашний каталог(в котором exe лежит)! чтоб туда и сохранять!

Код
ExtractFileDir(Application.ExeName)


Это сообщение отредактировал(а) Poseidon - 29.3.2005, 19:26


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0490 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.