Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/8: Рейтинг темы: голосов - 8, средняя оценка - 4.75
 Аватар для Venera
8 / 7 / 0
Регистрация: 31.10.2008
Сообщений: 92

В функцию передать указатель на струкруру

12.03.2009, 09:38. Показов 1595. Ответов 8
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем привет:!
Мне нужно создать собственную функцию и передать туда указатель на созданную мной структуру. Структура есть, она описана в модуле Unit1.срр
И выглядит так
Code
1
2
3
4
5
6
typedef struct Perehod   
{
 AnsiString s;
 TList *Vyhod,*Vhod;
} TPerehod;
typedef TPerehod *PPerehod;
В Unit1.h я объявляю функцию int __fastcall PrFish( Что тут написать?);
мне кажется я уже все способы перепробовала, а программа ругается
Может вообще не те модули взяла?
ПОМОГИТЕ!!!!
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
12.03.2009, 09:38
Ответы с готовыми решениями:

В функцию-метод передать указатель на другую функцию-метод и вызвать через переданный указатель
Друзья! Всем привет. Вот код: class otets { public: void f (void (otets::*p)()); private: void echo_f (){}; ...

Передать в неуправляемую функцию указатель на указатель
Неуправляемая функция типа FUNC(int ** r); Делаю так fixed (int* ptr = arr) { FUNC((int **)ptr); ...

Передать в функцию указатель на указатель
Добрый день, В main я создаю указатель на строку, память для которой хочу выделить внутри другой функции. Освободить в main. Вопрос:...

8
Эксперт С++
 Аватар для XuTPbIu_MuHTAu
2256 / 771 / 25
Регистрация: 27.05.2008
Сообщений: 1,496
12.03.2009, 09:40
структура должна быть описана в .h файле,перед упоминанием этого типа в прототипах функций.
0
Почетный модератор
 Аватар для Lord_Voodoo
8785 / 2538 / 144
Регистрация: 07.03.2007
Сообщений: 11,873
12.03.2009, 09:50
а что именно пишет? какие ошибки?
0
 Аватар для Venera
8 / 7 / 0
Регистрация: 31.10.2008
Сообщений: 92
12.03.2009, 10:07  [ТС]
Если я функцию объявляю так
int __fastcall PrFish(TPerehod *Pr);
то ошибка вот такая
[C++Error]Unit1.h(40):E2293) expected
0
Почетный модератор
 Аватар для Lord_Voodoo
8785 / 2538 / 144
Регистрация: 07.03.2007
Сообщений: 11,873
12.03.2009, 10:10
Venera, покажи весь листинг своего хидера... так сложно что-то сказать...
0
 Аватар для Venera
8 / 7 / 0
Регистрация: 31.10.2008
Сообщений: 92
12.03.2009, 10:21  [ТС]
Цитата Сообщение от XuTPbIu_MuHTAu Посмотреть сообщение
структура должна быть описана в .h файле,перед упоминанием этого типа в прототипах функций.
вот так?
public:
typedef struct *TPerehod ; программа ругается

Добавлено через 6 минут 50 секунд
WooDooMan, чего показать? всю прогу чтоли скинуть?
0
Почетный модератор
 Аватар для Lord_Voodoo
8785 / 2538 / 144
Регистрация: 07.03.2007
Сообщений: 11,873
12.03.2009, 10:28
а у вас на эту TList *Vyhod,*Vhod; не ругается разве?

ну содержание хидер-файла покажи...
typedef struct *TPerehod ; - это неправильно, у тебя в первом посте правильно написано
0
 Аватар для Venera
8 / 7 / 0
Регистрация: 31.10.2008
Сообщений: 92
12.03.2009, 11:06  [ТС]
TList *Vyhod,*Vhod; не ругается
Модуль h
Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
class TForm1 : public TForm
{
__published:    // IDE-managed Components
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TButton *Button1;
        TButton *Button2;
        TButton *Button3;
        TButton *Button4;
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall Button1Click(TObject *Sender);
        int __fastcall PrFish();//TPerehod *Pr)
private:    // User declarations
public:     // User declarations
        __fastcall TForm1(TComponent* Owner);
       // typedef struct Perehod ;
        //int __fastcall PrFish();
};
Модуль cpp
Я почти всю программу отправлю, заодно спрошу, можно ли так списки связывать?
Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 //typedef struct PrDuga TPrDuga;
 //typedef  struct Position TPos;
typedef struct Perehod   //Заголовочный список поереходов
{
 AnsiString s;
 TList *Vyhod,*Vhod;
} TPerehod;
typedef TPerehod *PPerehod;
 
typedef struct PosDuga
{
 int Col; //Количество дуг
 PPerehod id;
}TPosDuga; // Структура
typedef  TPosDuga *PPosDuga ;// Указатель на структуру
 
typedef struct Position // заголовочный список позиций
{
 int Fish;
 TList *Vyhod;
} TPos;
typedef  TPos* PPos;
 
typedef struct PrDuga
{
 int Col;
  PPos id;
} TPrDuga;
typedef  TPrDuga *PPrDuga ;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
 
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
 // -------------Список позций ------------------
 
  PPos AStruct;
  TList *Position = new TList;
  ///PrDuga *DugaStruct=new PrDuga;
 
  AStruct=new TPos;
  AStruct->Fish = 1;
  //AStruct->Vyhod=NULL;
  Position->Add(AStruct);
 
  AStruct=new TPos;
  AStruct->Fish = 2;
  //AStruct->Vyhod=NULL;
  Position->Add(AStruct);
 
  AStruct=new TPos;
  AStruct->Fish = 3;
  //AStruct->Vyhod=NULL;
  Position->Add(AStruct);
 
  AStruct=new TPos;
  AStruct->Fish = 4;
  //AStruct->Vyhod=NULL;
  Position->Add(AStruct);
 
  AStruct=new TPos;
  AStruct->Fish = 5;
  //AStruct->Vyhod=NULL;
  Position->Add(AStruct);
 
  int i=0;
  AnsiString s;
  for (i=0; i<5; i++) {
  AStruct = (PPos) Position->Items[i];
  s = s + IntToStr(AStruct->Fish);
  s = s + "  ";
  }
  Label17->Caption = s;
 
 
  //---------Список переходов------------
 
   PPerehod BStruct;
   TList *Perehody = new TList;
 
   BStruct = new TPerehod;
   BStruct->s = "1 - Vanya";
//   BStruct->Vhod=NULL;
//   BStruct->Vyhod=NULL;
   Perehody->Add(BStruct);
 
   BStruct = new TPerehod;
   BStruct->s = "2 - Katya";
  // BStruct->Vhod=NULL;
   //BStruct->Vyhod=NULL;
   Perehody->Add(BStruct);
 
   BStruct = new TPerehod;
   BStruct->s = "3 - Irina";
   //BStruct->Vhod=NULL;
  // BStruct->Vyhod=NULL;
   Perehody->Add(BStruct);
 
   BStruct = new TPerehod;
   BStruct->s = "4 - URA!!!";
   //BStruct->Vhod=NULL;
  // BStruct->Vyhod=NULL;
   Perehody->Add(BStruct);
   //Label16->Caption = IntToStr(Perehody->Count) ;
 
 
  // ---дуги для каждой позиции---------
  //----позиция 1----------------
 
  PPosDuga PosDStruct;
  TList *Duga;
 
  Duga = new TList;
  PosDStruct = new TPosDuga;
 
  PosDStruct->id = (PPerehod) Perehody->Items[0];
  Duga->Add(PosDStruct);
  AStruct = (PPos) Position->Items[0]; // выделили позицию 1
  AStruct->Vyhod = Duga; // привязали список дуг
 
  PosDStruct = (PPosDuga) AStruct->Vyhod->Items[0]; // выделили первый элемент списка дуг
  Label1->Caption = PosDStruct->id->s;
 
  //-------- позиция 2 ------------
 
  PosDStruct=new TPosDuga;
  Duga = new TList;
 
  PosDStruct->id=(PPerehod)Perehody-> Items[1];
  Duga->Add(PosDStruct);
  AStruct=(PPos) Position->Items[1];
  AStruct->Vyhod = Duga;
 
  PosDStruct = (PPosDuga) AStruct->Vyhod->Items[0];
  Label2->Caption = PosDStruct->id->s;
 
  // -----------Позиция 3--------
 
  Duga = new TList;
 
  PosDStruct=new TPosDuga;
  PosDStruct->id=(PPerehod)Perehody-> Items[1];
  Duga->Add(PosDStruct);
 
  PosDStruct=new TPosDuga;
  PosDStruct->id=(PPerehod)Perehody-> Items[2];
  Duga->Add(PosDStruct);
 
 
  AStruct=(PPos) Position->Items[2];
  AStruct->Vyhod = Duga;
  PosDStruct = (PPosDuga) AStruct->Vyhod->Items[0];
  Label3->Caption = PosDStruct->id->s;
  PosDStruct = (PPosDuga) AStruct->Vyhod->Items[1];
  Label4->Caption = PosDStruct->id->s;
  /*PosDStruct=new TPosDuga;
  Duga->Add(PosDStruct);
  Duga->Add(PosDStruct);
 
  AStruct=(PPos)Position->Items[2];
  AStruct->Vyhod = Duga->Items[0];
 
  PosDStruct->id=( PPerehod)Perehody->Items[1];
  Label3->Caption = PosDStruct->id->s;
                                        */
  // -----------Позиция 4--------
  Duga = new TList;
  PosDStruct=new TPosDuga;
  PosDStruct->id=( PPerehod)Perehody->Items[3];
  Duga->Add(PosDStruct);
 
  AStruct=(PPos)Position->Items[3];
  AStruct->Vyhod = Duga;
  PosDStruct=(PPosDuga)AStruct->Vyhod->Items[0];
  Label5->Caption = PosDStruct->id->s;
 
  // -----------Позиция 5--------
  Duga = new TList;
  PosDStruct=new TPosDuga;
  PosDStruct->id=( PPerehod)Perehody->Items[1];
  Duga->Add(PosDStruct);
 
  AStruct=(PPos)Position->Items[4];
  AStruct->Vyhod = Duga;
  PosDStruct=(PPosDuga)AStruct->Vyhod->Items[0];
  Label6->Caption = PosDStruct->id->s;
 
 
  // ---дуги исходящие из прехода--------
 
   PPrDuga PrDStruct;
   TList *DugaPr;
   //----переход 1----------------
 
   DugaPr = new TList;
   PrDStruct = new TPrDuga;
   PrDStruct->id =(PPos) Position->Items[4];/////
   DugaPr->Add(PrDStruct);
 
   BStruct=(PPerehod)Perehody->Items[0];
   BStruct->Vyhod=DugaPr;
   PrDStruct=(PPrDuga)BStruct->Vyhod->Items[0];
   Label7->Caption = PrDStruct->id->Fish;
 
   //----переход 2----------------
   DugaPr = new TList;
   PrDStruct = new TPrDuga;
   PrDStruct->id=(PPos)Position->Items[4];
   DugaPr->Add(PrDStruct);
 
   BStruct=(PPerehod)Perehody->Items[1];
   BStruct->Vyhod=DugaPr;
   PrDStruct=(PPrDuga)BStruct->Vyhod->Items[0];
   Label8->Caption = PrDStruct->id->Fish;
 
   //----переход 3----------------
   DugaPr = new TList;
   PrDStruct = new TPrDuga;
   PrDStruct->id=(PPos)Position->Items[3];
   DugaPr->Add(PrDStruct);
 
   BStruct=(PPerehod)Perehody->Items[2];
   BStruct->Vyhod=DugaPr;
   PrDStruct=(PPrDuga)BStruct->Vyhod->Items[0];
   Label9->Caption = PrDStruct->id->Fish;
 
   //----переход 4----------------
   DugaPr = new TList;
   PrDStruct = new TPrDuga;
   PrDStruct->id=(PPos)Position->Items[2];
   DugaPr->Add(PrDStruct);
 
   PrDStruct = new TPrDuga;
   PrDStruct->id=(PPos)Position->Items[1];
   DugaPr->Add(PrDStruct);
 
   BStruct=(PPerehod)Perehody->Items[3];
   BStruct->Vyhod=DugaPr;
   PrDStruct=(PPrDuga)BStruct->Vyhod->Items[0];
   Label10->Caption = PrDStruct->id->Fish;
   PrDStruct=(PPrDuga)BStruct->Vyhod->Items[1];
   Label11->Caption = PrDStruct->id->Fish;
 
  //---------дуги входящие в переход------
 
   PPrDuga PrPosDStruct;
   TList *DugaPrPos;
 
 
   //----переход 1----------------
   DugaPrPos = new TList;
   PrPosDStruct = new TPrDuga;
   PrPosDStruct->id =(PPos) Position->Items[0];
   DugaPrPos->Add(PrPosDStruct);
 
   BStruct=(PPerehod)Perehody->Items[0];
   BStruct->Vhod=DugaPrPos;
 
   PrPosDStruct=(PPrDuga)BStruct->Vhod->Items[0];
   Label12->Caption = PrPosDStruct->id->Fish;
 
   //----переход 2----------------
   DugaPrPos = new TList;
 
   PrPosDStruct = new TPrDuga;
   PrPosDStruct->id =(PPos) Position->Items[1];
   DugaPrPos->Add(PrPosDStruct);
 
   PrPosDStruct = new TPrDuga;
   PrPosDStruct->id =(PPos) Position->Items[2];
   DugaPrPos->Add(PrPosDStruct);
 
   PrPosDStruct = new TPrDuga;
   PrPosDStruct->id =(PPos) Position->Items[4];
   DugaPrPos->Add(PrPosDStruct);
 
   BStruct=(PPerehod)Perehody->Items[1];
   BStruct->Vhod=DugaPrPos;
 
   PrPosDStruct=(PPrDuga)BStruct->Vhod->Items[0];
   Label13->Caption = PrPosDStruct->id->Fish;
   PrPosDStruct=(PPrDuga)BStruct->Vhod->Items[1];
   Label14->Caption = PrPosDStruct->id->Fish;
   PrPosDStruct=(PPrDuga)BStruct->Vhod->Items[2];
   Label15->Caption = PrPosDStruct->id->Fish;
 
  /*
   for (i=0; i<3; i++) {
   PrPosDStruct = new TPrDuga;
   DugaPrPos->Add(PrPosDStruct); }
 
   BStruct->Vhod->Items[0]->id =(PPos) Position->Items[1];
   BStruct->Vhod->Items[1]->id =(PPos) Position->Items[2];
   BStruct->Vhod->Items[2]->id =(PPos) Position->Items[4];
   Label13->Caption = BStruct->Vhod->Items[0]->id->Fish;
   Label14->Caption = BStruct->Vhod->Items[1]->id->Fish;
   Label15->Caption = BStruct->Vhod->Items[2]->id->Fish;  */
   //----переход 3----------------
 
   DugaPrPos = new TList;
   PrPosDStruct = new TPrDuga;
   PrPosDStruct->id =(PPos) Position->Items[2];
   DugaPrPos->Add(PrPosDStruct);
 
   BStruct=(PPerehod)Perehody->Items[2];
   BStruct->Vhod=DugaPrPos;
   PrPosDStruct=(PPrDuga)BStruct->Vhod->Items[0];
   Label16->Caption = PrPosDStruct->id->Fish;
   //BStruct->Vhod->Items[0]->id =(PPos) Position->Items[2];
  // Label16->Caption = BStruct->Vhod->Items[0]->id->Fish;
 
   
   //----переход 4----------------
   DugaPrPos = new TList;
   PrPosDStruct = new TPrDuga;
   PrPosDStruct->id =(PPos) Position->Items[3];
   DugaPrPos->Add(PrPosDStruct);
 
   BStruct=(PPerehod)Perehody->Items[3];
   BStruct->Vhod=DugaPrPos;
   PrPosDStruct=(PPrDuga)BStruct->Vhod->Items[0];
   Label17->Caption = PrPosDStruct->id->Fish;
0
Почетный модератор
 Аватар для Lord_Voodoo
8785 / 2538 / 144
Регистрация: 07.03.2007
Сообщений: 11,873
12.03.2009, 11:19
очень смешно, у вас все структуры описаны в срр, а обращение к ним идет в хидере, что не есть правильно, потому что прежде чем что-то использовать, его надо описать, перенесите описание структур в хидер-файл перед описанием класса, и все у вас будет хорошо...
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
12.03.2009, 11:19
Помогаю со студенческими работами здесь

Работа с файлом (передать указатель на файл в функцию, вернуть указатель на файл из функции)
Подскажите как передать указатель на файл в функцию, как вернуть указатель на файл из функции. void Open() // из этой функции вернуть...

Как передать параметр типа "указатель на указатель" в функцию?
#include &quot;stdafx.h&quot; #include &lt;conio.h&gt; #include &lt;iostream&gt; using namespace std; #include &lt;iomanip&gt; using std::setiosflags; ...

Как передать указатель на функцию в функцию
И как с ней работать?

Передать указатель в функцию
Помогите, пожалуйста, как передать указатель на элемент линейного списка?

Передать указатель на функцию в dll
Добрый день! Удачно вызывается функция в dll, указатель которой берется таким способом - p := @MyFunc Так вот, теперь я создаю TThread...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
9
Ответ Создать тему
Новые блоги и статьи
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru