Pokaż wiadomości

Ta sekcja pozwala Ci zobaczyć wszystkie wiadomości wysłane przez tego użytkownika. Zwróć uwagę, że możesz widzieć tylko wiadomości wysłane w działach do których masz aktualnie dostęp.


Wiadomości - Jakubek

Strony: [1] 2
1
Szkółka / Odp: Logo - programowanie ?
« dnia: Luty 02, 2006, 19:32:31 »
ale to jakiś program jest ?? ,... jak tak to podajcie linka :D

2
Językoznawstwo / Odp: Tester
« dnia: Luty 02, 2006, 16:23:37 »
nie chodziło mi o to aby ktoś mi napisał kod :D :D :D
... zrobię tak jak Gorion pisał .. dzięki

3
Językoznawstwo / Odp: Tester
« dnia: Luty 02, 2006, 16:14:08 »
nie, nie

Zrobiłem program w Delphi (wiedza 1.1) i teraz chcę dodać do niej opcję "dodawanie pytań" . Jak to zrobić ??

4
Językoznawstwo / Odp: Tester
« dnia: Luty 02, 2006, 16:01:08 »
no tak ale jak dodać coś do kodu jak ta gra jest już zrobiona...(poplątałem ? :D )


5
Językoznawstwo / Odp: Tester
« dnia: Luty 02, 2006, 15:48:54 »
ściągnij program
www.gim3.net/Wiedza.zip

oo .. np. chcę zrobić coś takiego

1. W programie będzie opcja dodaj pytanie .. i to pytanie będzie się zapisywało w pliku .txt a potem będzie się samo dodawało do skryptu ... wogóle nie wiem jak to zrobić :D więc proszę o pomoc ...




pozdr.  ;D

6
Językoznawstwo / Tester
« dnia: Luty 02, 2006, 14:54:29 »
Witam !!

Muszę zrobić  grę "Tester 1.1" jest to gra która losowo zadaje pytanie... tu jest kod.. zrobione w Delphi ... wiem wiem, badziewie ale muszę przynieś to do szkoły

unit Unit1;

interface

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

type
  Ttest = class(TForm)
    PanelPytanie: TPanel;
    PanelOdpowiedz: TPanel;
    PanelStatystyka: TPanel;
    tekstPytanie: TLabel;
    Label1: TLabel;
    tekst: TLabel;
    tekst1: TLabel;
    tekstLiczbaPytan: TLabel;
    tekstLiczbaPoprawnych: TLabel;
    tekstLiczbaBlednych: TLabel;
    radioOdpowiedz1: TRadioButton;
    radioOdpowiedz2: TRadioButton;
    radioOdpowiedz3: TRadioButton;
    przyciskOdpowiedz: TButton;
    MainMenu1: TMainMenu;
    Plik1: TMenuItem;
    Zamknij1: TMenuItem;
    Pomoc1: TMenuItem;
    Wiedzainformacje1: TMenuItem;
    Dodaj1: TMenuItem;
    Pytanie1: TMenuItem;
    procedure Zamknij1Click(Sender: TObject);
    procedure uaktualnijnapisy(numerPytania:integer);
    procedure Ttest.FormCreate(Sender: TObject);
    procedure Ttest.przyciskOdpowiedzClick(Sender:TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
const liczbaPytan=3
var
  test: Ttest;
  pytanie: array [1..liczbaPytan] of string;
  odpowiedz1: array[1.liczbaPytan] of string;
  odpowiedz2: array[1..liczbaPytan] of string;
  poprawne: array [1.liczbaPytan] of integer;
  aktualnePytanie:integer;
  liczbaPoprawnych:integer;
implementation

{$R *.dfm}

procedure Ttest.Zamknij1Click(Sender: TObject);
begin
close;
end;

procedure uaktualnijnapisy(numerPytania:integer);
begin
test.Caption:='Wiedza' + intToStr(aktualnePytanie)+'/' +intToStr(liczbaPytan);
test.tekstPytanie.Caption:=pytanie[numerPytania];
test.radioOdpowiedz1.Caption:=pytanie[numerPytania];
test.radioOdpowiedz2.Caption:=pytanie[numerPytania];
test.radioOdpowiedz3.Caption:=pytanie[numerPytania];
test.tekstLiczbaPytan.Caption:=intToStr(aktualnePytanie-1);
test.tekstLiczbaPoprawnych.Caption:=intToStr(liczbaPoprawnych);
test.tekstLiczbaBlednych.Caption:=intToStr(aktualnePytanie-liczbaPoprawnych-1);
end;

procedure Ttest.FormCreate(Sender: TObject);
begin
pytanie [1]:='Jakies pytanie?';
odpowiedz1[1]:='odpowiedz1';
odpowiedz2[1]:='odpowiedz2';
odpowiedz3[1]:='odpowiedz3';
poprawne[1]:=2;

pytanie [2]:='Jakies pytankoooooooo?';
odpowiedz1[2]:='odpowiedz1';
odpowiedz2[2]:='odpowiedz2';
odpowiedz3[2]:='odpowiedz3';
poprawne[2]:=1;

pytanie [3]:='Jakies pytanieeeeeeeeeyyy?';
odpowiedz1[3]:='odpowiedz1';
odpowiedz2[3]:='odpowiedz2';
odpowiedz3[3]:='odpowiedz3';
poprawne[3]:=3;

liczbaPoprawnych:=0;
aktualnePytanie:=1;
uaktualnijNapisy(aktualnePytanie);
end;

function
begin
if test.radioOdpowiedz1.Checked then

begin
test.radioOdpowiedz1.Checked:=false;
ktoraOdpowiedzWybrano:=1;

end
else if test.radioOdpowiedz2.checked:= then
begin
test.radioOdpowiedz2.Checked:=false;
ktoraOdpowiedzWybrano:=2;
end
else if test.radioOdpowiedz3.checked:= then
begin
test.radioOdpowiedz3.Checked:=false;
ktoraOdpowiedzWybrano:=3;
end
else
ktoraOdpowiedzWybrano:=-1;
end;

procedure Ttest.przyciskOdpowiedzClick(Sender:TObject)
var wybranaOdpowiedz:integer;
begin
wybranaOdpowiedz:=ktoraOdpowiedzWybrano();
if wybranaOdpowiedz=-1 then
showMessage('Zaznacz jedną opcję')
else
begin
if wybranaOdpowiedz=poprawne[aktualnePytanie]then
liczbaPoprawnych:=liczbaPoprawnych+1;

aktualnePytanie:=aktualnePytanie+1

if aktualnePytanie<=liczbaPytan then
uaktualnijNapisy(aktualnePytanie)
else
begin
test.tekstLiczbaPytan.Caption:=intToStr(liczbaPytan);
test.tekstLiczbaPoprawnych.Caption:=intToStr(liczbaPoprawnych);
test.tekstLiczbaBlednych.Caption:=intToStr(liczbaPytan - liczbaPoprawnych);
showmessage('Odpowiedziałes już na wszystkie pytania');
close;
end;



i teraz pytanie.. jak zrobić aby w tym programie można było dodawać pytania ?? ..

7
Szkółka / Odp: Logo - programowanie ?
« dnia: Luty 01, 2006, 14:42:59 »
widocznie tak :D
ale będą jaja na lekcjach :D

8
Szkółka / Odp: Logo - programowanie ?
« dnia: Luty 01, 2006, 13:53:43 »
Jak w przedszkolu :D :D

9
Szkółka / Logo - programowanie ?
« dnia: Luty 01, 2006, 13:47:25 »
Witajcie :D !

Moje profesorka od Informatyki powiedziała:

Cytuj
W następnym półroczu będziemy uczyć się Logo


Co to jest to Logo?? Ona powiedziała, że coś o programowaniu, ale co?? Nigdzie na google nie mogę znaleźć...


Pozdrawiam  :D

10
Szkółka / Odp: Od czego .. ?
« dnia: Luty 01, 2006, 13:35:22 »
A właśnie, jaki kompilator jest polecany przez waz? Bo ja teraz używam Dev-C++.....

11
Gry / Odp: W co gramy...
« dnia: Luty 01, 2006, 02:54:55 »
Gram lub grałem w:
GTA SA - znudziło się po 2 dniach
Age of empire 3 PL - znudziło się po 4 dniach
Elastomania - przeszedłem w 1 dzień...znudziło się grać 2 raz


uważam że gry które wychodzą teraz są nudne.. :(

12
Szkółka / Odp: Od czego .. ?
« dnia: Styczeń 31, 2006, 23:55:01 »
http://www.warsztat.gd/artykuly/get-article.html?ID=27
Mam pytanie dlaczego nazwa tego arttykulu nie pokazuj sie jak chce wejsc przes strone glowna i klikam na artykuly to tego tam nie ma ktos wie czemu?

U mnie działa..

Do Zariusa
Teraz w książce stanąłem na zmiennych string, greeting, const
i za cholerę nie mogę tego pojąć, czytałem to z 10 razy ze zrozumieniem i nic...
Ale nie tracę wiary, że mi się to uda :D :D :D

pozdr. ;)

13
Szkółka / Odp: Silnik Główny
« dnia: Styczeń 31, 2006, 21:23:43 »
A więc się myliłem..  :D


14
Szkółka / Odp: Silnik Główny
« dnia: Styczeń 31, 2006, 20:36:26 »
CSS odpowiada za
- czcionke
- ramki itd.

Silnik odpowiada za (chyba :D )
- grafikę
- muzyczkę
- i te inne dodatki


A więc podobne :D :D :D

15
Szkółka / Odp: Od czego .. ?
« dnia: Styczeń 31, 2006, 17:46:23 »
Już jestem ziomeczki :D :D

kupiłem książeczkę "C++ potęga języka" Andrew Koenig and Barbara E.Moo

książka wydaje mi się świetna ... zaczyna się od bardzo prostych  zadań (typu hello, world !) a kończy na bardzo trudnych
są opisy różnych bibliotek itd. (416 stron, 45 zł) ..

jak przeczytam to dam ocenę :D :D :D

Strony: [1] 2