Re: Obiekt jako parametr procedury - problem - Article 92314 - go-pugleaf

Article View: pl.comp.lang.pascal

Article #92314

Back to pl.comp.lang.pascal Previous Next

Re: Obiekt jako parametr procedury - problem

#92314

From: Terrmit
Date: Thu, 06 Dec 2007 08:17

33 lines
1836 bytes

Terrmit pisze:
> Witam,
> 
> Mam (w skrócie) taką procedurę:
> 
> procedure InitStringGrid(var Grid: TStringGrid; head: String);
> begin
>   with Grid do begin
>     //costam robie, a na koniec
>       Hint := head;
>   end; //with
> end;
> 
> Teraz w głównym programie wywoluję procedure tak:
> 
> InitStringGrid(sgIncProd, 'dymek');
> 
> No i okazuje się, że sgIncProd.Hint = '' (pusty)
> a powinien zawierać wyraz 'dymek'.
> 
> Może jestem już zmęczony, ale nie bardzo kumam co jest nie tak.
> 
> Używam Lazarusa 0.9.25 i fpc 2.2.0-0 w Fedorze 8.
> 
> Sławek
Ech, oczywiście zmęczenie dało się we znaki.
Błąd miałem gdzie indziej, a dokładniej w linii, którą oznaczyłem jako:
      //costam robie, a na koniec
Nie będę tego przytaczał, ale był tam warunek, który działał
błędnie i Hint := head; po prostu się nie wykonywało.

Przepraszam za zamieszanie.
   Sławek

Technical Details

Message-ID: <fj8bdf$f6c$1@atlantis.news.tpi.pl>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.internetia.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail

References: <fj7cka$ldq$1@nemesis.news.tpi.pl>

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.internetia.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail
From: Terrmit <terrmitv@poczta.onet.pl>
Newsgroups: pl.comp.lang.pascal
Subject: Re: Obiekt jako parametr procedury - problem
Date: Thu, 06 Dec 2007 09:17:13 +0100
Organization: tp.internet - http://www.tpi.pl/
Lines: 33
Message-ID: <fj8bdf$f6c$1@atlantis.news.tpi.pl>
References: <fj7cka$ldq$1@nemesis.news.tpi.pl>
NNTP-Posting-Host: fge166.internetdsl.tpnet.pl
Mime-Version: 1.0
X-Trace: atlantis.news.tpi.pl 1196929264 15564 83.13.160.166 (6 Dec 2007 08:21:04 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Thu, 6 Dec 2007 08:21:04 +0000 (UTC)
User-Agent: Thunderbird 2.0.0.9 (X11/20071115)
In-Reply-To: <fj7cka$ldq$1@nemesis.news.tpi.pl>
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Reply to Parent Message