Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

Вот решил классы освоить...   Найти похожие ветки 

 
Shadow77   (2003-11-03 01:30) [0]

Собрав скудную информацию из двух книжек, написал вот этот код. При его выполнении выскакивает ошибка доступа. Скорее всего ошибка не простая, а очень простая, но я уже голову сломал... Наверное, к ночи уже клинит меня...

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
end;

type TLocationTable = class
PlrsCont:integer;
end;

var
Form1: TForm1;
LocationTable: TLocationTable;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
LocationTable.Create;
LocationTable.PlrsCont:=1; //<-Здесь Access Violation
LocationTable.Free;
end;

end.


 
Вася Пупкин ©   (2003-11-03 01:40) [1]

LocationTable.Create;
замени на
LocationTable:=TLocationTable.Create;


 
Shadow77   (2003-11-03 02:17) [2]

Да, теперь работает. Свежий взгляд это всегда хорошо. Спасибо.


 
Palladin ©   (2003-11-03 02:17) [3]

Удалено модератором


 
KSergey ©   (2003-11-03 08:15) [4]

[2] Shadow77 (03.11.03 02:17)
Да, теперь работает. Свежий взгляд это всегда хорошо.

Это не свежий взгляд.
Я не знаю, какие книги вы читали, но есть огромное подозрение, что не внимательно.



Страницы: 1 вся ветка

Текущий архив: 2003.11.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
1-41541
Blunder
2003-10-28 08:09
2003.11.13
О строках


14-42001
Мазут Береговой
2003-10-17 10:52
2003.11.13
Помогите! Ламерский вопрос: как выглядит


9-40777
Vasiliy
2003-05-10 21:13
2003.11.13
Как избавиться от мерцания окна при перерисовке


1-41451
WondeRu
2003-10-23 09:43
2003.11.13
Плагины и СОМ


3-40875
Zn
2003-10-17 18:40
2003.11.13
Как из SELECT-а обратиться к хранимой процедуре?