Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Мужики! Помогите, plz, перевести код из Delphi в C++ Builder  (Прочитано 7375 раз)
0 Пользователей и 1 Гость смотрят эту тему.
ticksp
Гость
« : 20-04-2006 10:24 » 

Собственно сабж.
Есть код на Delphi:

Код:
FI_Handle = Pointer;

function TTargaImage.FI_ReadProc(buffer : pointer; size : Cardinal; count : Cardinal; handle : fi_handle) : UInt; stdcall;
var
  stream: TStream;
  bytesToRead: Cardinal;
begin
  stream := TStream(handle);
  bytesToRead := size*count;
  Result := stream.Read(buffer^, bytesToRead);
end;

Никак не могу тоже повторить на C++ Builder. Особенно интересует строка stream := TStream(handle); так как компилятор ругается на нее.
Записан
PooH
Глобальный модератор

ru
Offline Offline
Пол: Мужской
... и можно без хлеба!


« Ответ #1 : 20-04-2006 12:00 » 

а если попробовать
Код:
  TStream * stream;
...
stream = new TStream(handle);
...
delete (stream);

ну примерно что-то в этом духе.
Записан

Удачного всем кодинга! -=x[PooH]x=-
ticksp
Гость
« Ответ #2 : 20-04-2006 12:13 » 

Уже пробовал! Не проходит:

[C++ Error] NewImageTypes.cpp(20): E2352 Cannot create instance of abstract class 'TStream'
[C++ Error] NewImageTypes.cpp(20): E2353 Class 'TStream' is abstract because of '_fastcall TStream::Read(void *,int) = 0'
« Последнее редактирование: 06-12-2007 17:47 от Алексей1153++ » Записан
PooH
Глобальный модератор

ru
Offline Offline
Пол: Мужской
... и можно без хлеба!


« Ответ #3 : 20-04-2006 12:18 » 

тогда попробуй:
stream = TStream.Create(...)

вместо stream = new TStream(handle);
Записан

Удачного всем кодинга! -=x[PooH]x=-
ticksp
Гость
« Ответ #4 : 20-04-2006 13:14 » 

Не проходит:

[C++ Error] NewImageTypes.cpp(20): E2108 Improper use of typedef 'TStream'
« Последнее редактирование: 06-12-2007 17:48 от Алексей1153++ » Записан
PooH
Глобальный модератор

ru
Offline Offline
Пол: Мужской
... и можно без хлеба!


« Ответ #5 : 20-04-2006 13:22 » 

тогда попробуй использовать:
Код:
TMemoryStream * stream;
...
stream = new TMemoryStream();
...
delete stream;

увы, под рукой нет билдера
Записан

Удачного всем кодинга! -=x[PooH]x=-
Scorp__)
Молодой специалист

ru
Offline Offline
Пол: Мужской

« Ответ #6 : 24-04-2006 15:52 » 

ticksp,
Цитата
[C++ Error] NewImageTypes.cpp(20): E2352 Cannot create instance of abstract class 'TStream'
[C++ Error] NewImageTypes.cpp(20): E2353 Class 'TStream' is abstract because of '_fastcall TStream::Read(void *,int) = 0'

Нельзя создать экземпляр абстрактного класса! Или что-то напутано в объявлении методов, или одно из двух Улыбаюсь Компилятор ругается абсолютно верно. Убери присваивание нулю
Код:
TStream::Read(void *,int) = 0
и определи метод и все будет нормально. Не верю, чтобы Delphi это собирала не ругаясь.
« Последнее редактирование: 06-12-2007 17:48 от Алексей1153++ » Записан

- А Вы сами-то верите в привидения?
- Конечно, нет, - ответил лектор и медленно растаял в воздухе.
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines