Нужна помощь! Работа с блобами.

[NewUser]

Код: Выделить всё

procedure TForm1.Button1Click(Sender: TObject);
var fs:TFileStream;
begin

     fs:=TFileStream.Create(FileNameEdit1.FileName,0);

     SQLQuery2.Params.ParamByName('LOADERR').LoadFromStream(fs,ftBlob);
     
     SQLQuery2.ExecSQL;

     SQLTransaction1.CommitRetaining;
     
     fs.Free;
     
end;

на строке SQLQuery2.Params. вылетает ошибка перед ftBlob
Unit1.pas(42,64) Error: Identifier not found "ftBlob"

если его убрать тоже ошибка
Unit1.pas(42,63) Error: Wrong number of parameters specified

параметр LOADERR опреден как input тип blob, уже час бьюсь - не могу пнять в чем причина

[Yogrik]

fs:=TFileStream.Create(FileNameEdit1.FileName,0);

думаю лучше написать так:

Код: Выделить всё

fs:=TFileStream.Create(FileNameEdit1.FileName,fmOpenRead);

на строке SQLQuery2.Params. вылетает ошибка перед ftBlob
Unit1.pas(42,64) Error: Identifier not found "ftBlob"
....
если его убрать тоже ошибка
Unit1.pas(42,63) Error: Wrong number of parameters specified

Ну а мысли что значат эти ошибки, и как с ними бороться???

параметр LOADERR опреден как input тип blob, уже час бьюсь - не могу пнять в чем причина

Мне искренне жаль, но может быть подумать о смене профессии/увлечения ???

[NewUser]

Yogrik
для меня это хобби, пытаюсь решать задачи - задаю вопросы

странная у всех привычка - пойди туда, посмотри там...

все же начинали, и у всех были вопросы. хочется услышать ответ - сделай так, здесь измени на то и тд.

спасибо

[shade]

Yogrik
Любое (об)ученье начинается с глупых ошибок. Вместо того, чтобы предлагать сменить увлечения, лучше бы указали на ошибку и как ее исправить, ну или промолчали...

[Yogrik]

Любое (об)ученье начинается с глупых ошибок. Вместо того, чтобы предлагать сменить увлечения, лучше бы указали на ошибку и как ее исправить, ну или промолчали...

А мертвые топики это хорошо???
Обучение надо начинать с чтения, в данном случает с документации или книг.....

Самое интересное что из трех вопросов все приципились к последнему, который шел как-бы "ps"

Собственно у каждого свои методы обучения, вот я и попросил интерпретировать ошибки своими словами "как понимаешь"....
ответа пока не услышал

[Yogrik]

странная у всех привычка - пойди туда, посмотри там...
все же начинали, и у всех были вопросы. хочется услышать ответ - сделай так, здесь измени на то и тд.
спасибо

Под лежачий камень вода не течет...

Удалите строчку 42 и ошибка исчезнет.

Но согласитесь это не то что вы хотели...

[Yogrik]

А вот другой пример

Код: Выделить всё

==========main.pp=======
BEGIN
  writeln(helloWorld);
END.
======================

==========myconst.pp=======
unit myconst;
interface
const
  helloWorld = 'Hello World';
implementation
END.
======================


Вопрос: Почему не компилируется main.pp и как это исправить.....

[shade]

на строке SQLQuery2.Params. вылетает ошибка перед ftBlob
Unit1.pas(42,64) Error: Identifier not found "ftBlob"

Я редко использую компоненты БД, да и lazarus у меня сейчас не стоит, поэтому сказать точно не могу, но скорее всего вы забыли подключить модуль, и скорее всего это DB.

Yogrik
-1

[Attid]

NewUser

все же начинали, и у всех были вопросы. хочется услышать ответ - сделай так, здесь измени на то и тд.

если показать все то ничему не научишься.


Yogrik

Удалите строчку 42 и ошибка исчезнет.

валялся по полу =) сильный метод обучения



NewUser ну а что за название темы ?
или ты первый раз форумами пользуешься ?
надо бы написать правила и начать ругаться =)

на твой вопрос shade ответил, больше сказать тут нечего.

[Yogrik]

Удалите строчку 42 и ошибка исчезнет.

валялся по полу =) сильный метод обучения

Это не метод обучения, это вариант ответа на вопрос

[NewUser]

Отвечаю, строчка 42 это

SQLQuery2.Params.ParamByName('LOADERR').LoadFromStream(fs,ftBlob);

такие прям все гении.
без обид, каждый спец в своем

[Attid]

мы поняли это.



глянь сюда лучше

[Sniper]

читая топик вспомнился классик "Мы все учились по-немногу, чему-нибудь и как-нибудь..." (c)