Article View: pl.comp.lang.delphi
Article #346986Pomysł a funkcjonalność - prośba o poradę
From: lordbz
Date: Sun, 12 May 2019 13:25
Date: Sun, 12 May 2019 13:25
31 lines
2515 bytes
2515 bytes
Witam Piszę pewną aplikację i wymyśliłem sobie żeby ograniczyć liczbę formatek itp. Aplikacja (poza tym co robi) ma możliwość dodawania użytkownika do bazy oraz edycji już istniejącego użytkownika. Tyle tytułem wstępu. Na formie dałem PageControl i dwie zakładki, oraz dwa przyciski (pobrane jednak z ramki). Jeden to "Zapisz" drugi "Koniec". Na TabSheet1 są kontrolki dodające użytkownika a na TabSheet2 wyświetlane są dane użytkownika z wcześniejszej formatki gotowe do edycji. Całość chciałem zrobić tak, żeby był jeden klawisz "Zapisz" (z ramki), który by obsługiwał obie sytuacje. Napisałem więc procedurę , która Insertuje do bazy nowego użytkownika, oraz osobną , która updatuje już istniejącego w bazie i teraz pod klawszem "Zapisz": procedure TFrm1.Btn1ZapiszClick(Sender: TObject); begin if PageControl1.ActivePageIndex = 0 then DodajUzytkownika //wywołuję procedurę dodawania else EdytujUztkownika end; taki pomysł - wydaje mi się , że ok ale.... jakoś czuję że to mało eleganckie, można prościej. Może jakoaś opinia (tylko bez krzyków bo zamknę się w sobie i znowu kasa na terapeutę pójdzie :-) ) pozdrawiam Przemek
Technical Details
Message-ID:
<f1d5f52e-7035-41ad-a7bb-b78126030630@googlegroups.com>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed.pionier.net.pl!takemy.news.telefonica.de!telefonica.de!weretis.net!feeder7.news.weretis.net!proxad.net!feeder1-2.proxad.net!209.85.166.216.MISMATCH!136no507135itk.0!news-out.google.com!l135ni108itc.0!nntp.google.com!u76no28450ita.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mailShow Full Headers
Complete Article Headers
X-Received: by 2002:a02:694f:: with SMTP id e76mr15699101jac.111.1557667550593; Sun, 12 May 2019 06:25:50 -0700 (PDT) X-Received: by 2002:aca:af4a:: with SMTP id y71mr10610215oie.55.1557667550383; Sun, 12 May 2019 06:25:50 -0700 (PDT) Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed.pionier.net.pl!takemy.news.telefonica.de!telefonica.de!weretis.net!feeder7.news.weretis.net!proxad.net!feeder1-2.proxad.net!209.85.166.216.MISMATCH!136no507135itk.0!news-out.google.com!l135ni108itc.0!nntp.google.com!u76no28450ita.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail Newsgroups: pl.comp.lang.delphi Date: Sun, 12 May 2019 06:25:50 -0700 (PDT) Complaints-To: groups-abuse@google.com Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=188.147.96.234; posting-account=7n8jYQoAAAD8CMBk_0SEIjdWdfp4EnSW NNTP-Posting-Host: 188.147.96.234 User-Agent: G2/1.0 MIME-Version: 1.0 Message-ID: <f1d5f52e-7035-41ad-a7bb-b78126030630@googlegroups.com> Subject: Pomysł a funkcjonalność - prośba o poradę From: lordbz <lordbz@gmail.com> Injection-Date: Sun, 12 May 2019 13:25:50 +0000 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit