Obiekty sa zabawne ?????? POMOCY !!!

Thread View: pl.comp.programming

3 messages

[T] Back to Threads [V] Tree View [G] Group Articles

3 total messages Started by omi... Wojciech Turski OMICRON Thu, 23 May 1996 00:00

#743

Author: omi... Wojciech Turski OMICRON
Date: Thu, 23 May 1996 00:00

98 lines
2723 bytes

Hi there .....

Wiec mam problem.....
(I PROSZE O BARDZO SZYBKA POMOC !!!!)

Sprawa jest dosyc pilna, pisze to 23.V a jutro ma byc to gotowe....

Hm.

Wiec najpierw przedstawie ten problemik:



Mam nastepujace deklaracje:



W module gr.tpu w czesci publicznej :

type
 Q=object
   ilosc, akt : integer;
   nazwa : string;
 end;

 Qgr=object (gr)
    kolortla, kolortextu : integer;
 end;

No i to dziala - uzywam tych obiektow w innych modulach i jest OK.
Problem nadchodzi gdy sprobuje odwolac sie do POLA obiektu w procedurze
nie bedacej jej metoda....

wyglada to tak:


unit menu;

interface

uses gr;

type
 menu=object (gr)
      ..... <deklaracje innych pol>

      procedure init;
      procedure show;
      ...... <deklaracje innych metod>
 end;

implementation

procedure menu.init
.....

procedure zapalone		{ procedura NIE JEST metoda menu }
begin
 setcolor (menu.kolortextu);	{ no i tu chce sie odwolac do pola kolortextu
				  ktore menu odziedziczylo po Qgr ! }
end;


No i tu sie pojawia 'Method identifier expected' z zaznaczonym kolortextu !

Probowalem roznych trickow, ale nie wiem jak moge sie odwolac do pola
obiektu w procedurze nie bedacej jego metoda !
Na razie w metodzie init zrobilem przypisanie typu

ktxt:=kolortextu;
ktla:=kolortla;

a ktxt i ktla sa globalnymi - i wtedy gdy wpisze do procedury zapalone ktxt to dziala!

Ciekaw jestem czy da sie jakos odwolac bezposrednio do pol nie czyniac procedury
metoda obiektu......

Bardzo prosze o pomoc - w miare mozliwosci szybka !

Jezeli ktos to DZIS przeczyta i zna odpowiedz proszony jest o JAK najszybszy kontakt -
 raczej przez telefon (0-42) 13-57-66. Ewentualnie prosze o odpowiedz e-mail'em na
omi...@lodz.pdi.net

Z gory dziekuje za wszelka pomoc.

Q.



-- 
   /-----\       /-----------------------------------------------------\
  [=======]~~\   | SuRfInG the NET !   The Virtual NET is CLOSE  !     |----|
   |     |   !   |                                                     |
   |  |  |   \~~~| oppz... no homepage yet.... BUT SOON !              |
   |     |       |                                                     |
   | \_/ |       | omi...@lodz.pdi.net    \|/     IRC: qba on #rpg-pl |
   \-----/      /=======================================================\

Re: Obiekty sa zabawne ?????? POMOCY !!!

#744

Author: Artur Mantiuk
Date: Fri, 24 May 1996 00:00

24 lines
834 bytes

> 
>  Qgr=object (gr)
>     kolortla, kolortextu : integer;
>  end;
> 

> unit menu;
> 
> interface
> 
> uses gr;
> 
> type
>  menu=object (gr)
>       ..... <deklaracje innych pol>
> 
>       procedure init;
>       procedure show;
>       ...... <deklaracje innych metod>
>  end;
> Na pewno za pozno, ale :
	DZIEDZICZ po 'Qgr' linia deklaracji obiektu : " menu = 
object(Qgr)

Re: Obiekty sa zabawne ?????? POMOCY !!!

#745

Author: al... Aleksander Cianciara
Date: Sat, 25 May 1996 00:00

65 lines
2122 bytes

omi...@lodz.pdi.net (Wojciech Turski OMICRON) wrote:

>Hi there .....

>Wiec mam problem.....
>(I PROSZE O BARDZO SZYBKA POMOC !!!!)

>Sprawa jest dosyc pilna, pisze to 23.V a jutro ma byc to gotowe....
Pewnie bedzie za pozno, ale moze ...

>Wiec najpierw przedstawie ten problemik:
[ciach]

>unit menu;
>interface
>uses gr;

>type
> menu=object (gr)
>      ..... <deklaracje innych pol>
>      procedure init;
>      procedure show;
>      ...... <deklaracje innych metod>
> end;

>implementation

>procedure menu.init
>.....

>procedure zapalone		{ procedura NIE JEST metoda menu }
>begin
> setcolor (menu.kolortextu);	{ no i tu chce sie odwolac do pola kolortextu
            ^^^^^
To jest dopiero typ obiektu. Jak chcesz sie odwolac do jego pola to
najpierw musisz utworzyc obiekt. Chmm chyba to niebyt czytelne wiec
krotki przyklad

procedure zapalone		
begin
 setcolor (integer);
 ...
end;

Teraz jest to chyba jasne?

>Ciekaw jestem czy da sie jakos odwolac bezposrednio do pol nie czyniac procedury
>metoda obiektu......
Oczywiscie ze mozna odwolywac sie do pol publicznych obiektu z
dowolnego miejsca z ktorego widoczny jest caly obiekt.

>Bardzo prosze o pomoc - w miare mozliwosci szybka !
Najszybsza z mozliwych (zaraz po przeczytaniu :) )


Pozdrawiam
Alex

--
e-mail: al...@geol.agh.edu.pl              University of Mining & Metallurgy
tel: (48 12) 17-38-93, fax: 33-10-71       Institute of Geophysics
==============================================================================
                 Life is brutal and full of zasadzek.
------------------------------------------------------------------------------

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads