![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Почему нельзя воспользоваться этим кодом? [D6, Paradox]
Lony © (2003-04-19 22:55:00)Возникает ошибка "Invalid class typecast" при выполнении этого кода:
procedure TForm1.SpeedButton6Click(Sender: TObject);
var
S: TStream;
begin
S:=Table1.CreateBlobStream(Table1.FieldByName("Улица"),bmRead);
S.Free;
end;
Как быть и в чём собственно ошибка?
Shirson (2003-04-25 10:42:00) [1]>Lony © (19.04.03 22:55)
не S: TStream;
а S: TMemoryStream;
kaif (2003-04-20 15:51:00) [2]Господи...
Просто просканируй набор данных. Например:
var
SL: TStringList;
begin
SL := TStringList.Create;
try
with Table1 do
begin
First;
while not Eof do
begin
SL.Add(FieldByName("Улица").AsString);
Next;
end;
end;
ShowMessage(SL.Text);
finally
SL.Free;
end;
end;
Lony (2003-04-20 12:16:00) [3]А как получить все значения поля "Улица"? И при этом не пользуясь TDBLookupComboBox?
Набережных С. (2003-04-20 09:18:00) [4]Значит, поле "Улица" не TBlobField
kaif (2003-04-20 01:43:00) [5]Не помню. Но по-моему S: TBlobStream