Hey isset
18: asdasdasdasd aus asdasdas schrieb am 13.12.2008 um 23:42 Uhr
dasdasd
17: lukas aus Idorf schrieb am 29.12.2006 um 22:09 Uhr
Homepage: http://guretzke.com
Kai mach ma nich son tram tram das is nur ne private hp ...
16: Oberbunnes aus Arenberg schrieb am 27.12.2006 um 20:56 Uhr
Homepage: http://www.du bist so doof.de
Leider lässt das Internet alles zu.
Wie kann man es schaffen so wenig IQ zu bekommen, und so eineN Müll zu machen.
Hoffentlich wirkt der Alkohol so, das Ihr bald von der Bildfläche verschwindet....
Ist das peinlich Euch zu kennen....
Hoffentlich werdet ihr balD erwachsen und nehmt dIese Scheiße aus dem Netz....so bekommt ihr nie einen Job !
15: Lukas aus Immendorf schrieb am 25.12.2006 um 17:42 Uhr
Homepage: http://guretzke.com
hiii olli schatz ..
ich liebe dich immernoch will dich zurückhaben
14: ann-ca aus Koblenz schrieb am 18.12.2006 um 14:16 Uhr
Homepage: http://unkreativ.oyla23.de
huhu mein schatz!!
wollt dir nur mal sagen, dass ich dich liebe :-)
danke, dass es dich gibt!!
:-*
13: ann-ca aus Koblenz schrieb am 13.12.2006 um 20:02 Uhr
Homepage: http://unkreativ.oyla23.de
huhu!
wollt nur ma danke für die eigene seite sagen!!
war schön eben mit dir :-)
big kizz
12: Webfighter1 aus Immendorf schrieb am 21.11.2006 um 13:15 Uhr
Homepage: http://www.ffw-immendorf.de
Gode hier mal en Fun Vido for You
http://www.myvideo.de/watch/82979
Dä
Big Smoke DOG
11: Webfighter1 aus Immendorf schrieb am 01.11.2006 um 22:55 Uhr
Homepage: http://ffw-immendorf.de
HAst du kien Bild mehr vom Uchs und mir oder wat!
Bin mim Sven gestern erst um 1:00 hiemgekracht, hätte evtl. doch mitfahren
sollen auch wenn ich dann im stehen gepennt hätte hat der tsven rote augen gehabt *Lach*
Na ja sieht doch schon mal besser aus.
Is der LUGU off oder wie.
Na ja ma gespannt ob der am samstag abend kimmt!
Bis moje oder so wenn du dein car bekimmst
De BIG SMOKE DOG
P.S. Nur Bitburger macht kein Kopfweh *Grins*
10: Nate aus Kowelenz schrieb am 14.10.2006 um 17:09 Uhr
HaaaY oLLi...
Wie gehtZ dish?
Mish qut...
eY finsch voLL qeiL von dia dass ich
ne eiqene Seite hab xD
VoLL süüüß x)
nYa dm Liebz ya
Nate
9: info aus info schrieb am 14.09.2006 um 08:54 Uhr
procedure TForm1.Button2Click(Sender: TObject);
var a,j,i:integer;
//anfang,ende:REAL;
begin
//anfang:=time;
for j:=n downto 1 do
for i:=1 to j do
if zahl[i]>zahl[i+1] then
begin
a:=zahl[i];
zahl[i]:=zahl[i+1];
zahl[i+1]:=a;
end;
for i:=1 to n do
Listbox2.items.add(Inttostr(zahl[i]));
end;
8: 0160 aus Koblenz schrieb am 26.06.2006 um 12:04 Uhr
du hast die haare schön du hast die haare schön
7: Lugu aus Idorf schrieb am 13.06.2006 um 20:17 Uhr
Homepage: http://www.guretzke.com
##################################################################
# Offen Arbeiten für dieses Programm : #
# ------------------------------------ #
# #
##################################################################
##################################################################
# Spezielle Anmerkungen zum Programm : #
# ------------------------------------ #
# #
##################################################################
# Unter LINUX Ausgabepufferung deaktivieren
$| = 1;
# Aufruf abschließende Arbeiten
&ENDESR;
##################################################################
# SUB10 Prüfen ob Datei vorhanden #
##################################################################
sub SUB10{
# Prüfen ob Import Datei vorhanden
$var_fehlertext = "";
#####print $var_pfad_zur_import_datei . "br>\n";
if ((!(-e $var_pfad_zur_import_datei_modeldetail)) || (!(-e $var_pfad_zur_import_datei_modelkartei))){
print "Importdateien nicht vollständig vorhanden!";
$var_fehlertext .= "Importdateien nicht vollständig vorhanden!\n";
$var_subroutine = "ENDE";
exit;
}
else {
$var_subroutine = "SUB20";
}
}
# Überführe erste Datei Detail in Hash
%hash_daten_kartei = ();
foreach $var_einzelne_zeile_kartei (@liste_datei_kartei) {
$var_einzelne_zeile_kartei =~ s/\"//gi;
$var_einzelne_zeile_kartei =~ s/\n//gi;
$var_einzelne_zeile_kartei =~ s/\r//gi;
@liste_einzelne_zeile_kartei = split (/\;/,$var_einzelne_zeile_kartei);
# Auslesen Inhalt Detail und zusammenführen mit Hash aus erster Datei in Gesamtliste
@liste_daten_gesamt = ();
%hash_kostueme = ();
$var_zaeler_key = "1";
foreach $var_einzelne_zeile_detail (@liste_datei_detail) {
$var_einzelne_zeile_detail =~ s/\"//gi;
$var_einzelne_zeile_detail =~ s/\;/\|/gi;
$var_einzelne_zeile_detail =~ s/\n//gi;
$var_einzelne_zeile_detail =~ s/\r//gi;
@liste_einzelne_zeile_detail = split(/\|/,$var_einzelne_zeile_detail);
if ($liste_einzelne_zeile_detail[0] eq "0") {
next;
}
print "1|-->|$var_einzelne_zeile_detail|-br>\n";
for (my $var_i = 0; $var_i scalar @liste_einzelne_zeile_detail; $var_i++) {
my $var_check = $liste_einzelne_zeile_detail[$var_i];
if ($var_check =~ /^\s*$/) {
$liste_einzelne_zeile_detail[$var_i] = "";
}
}
###print "ddhier..br>\nbr>\n";
$var_satz_kostuem = $liste_einzelne_zeile_detail[7];
$var_satz_kostuem =~ s/\s*?,\s*?/,/gi; # Alle Blanks vor und nach Komma raus
$var_satz_kostuem =~ s/,$//gi; # Letztes Komma entfernen wenn vorhanden
@liste_einzelne_felder_spalte = split(/\,/,$var_satz_kostuem);
for (my $var_i = 0; $var_i scalar @liste_einzelne_felder_spalte; $var_i++) {
my $var_check = $liste_einzelne_felder_spalte[$var_i];
if ($var_check =~ /^\s*$/) {
$liste_einzelne_felder_spalte[$var_i] = "";
}
}
foreach $var_einzelne_felder_spalte(@liste_einzelne_felder_spalte){
$var_key = $var_einzelne_felder_spalte;
$var_key =~ s/^\s+?//;
$var_key =~ s/\s+?$//;
if (($var_key =~ /^\s*$/) || ($var_key eq "0")) {
next;
}
6: olles aus Info-kurs schrieb am 12.06.2006 um 12:26 Uhr
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Button1: TButton;
Button2: TButton;
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button2Click(Sender: TObject);
begin
close;
end;
procedure TForm1.Button1Click(Sender: TObject);
var a,b,c:STRING;
e,i,d:Integer;
begin
a:=(Edit1.Text);
e:=length(a);
for i:=1 to e do
begin
if a[i]=\',\' then b:=copy(a,1,i-1) ;
if a[i]=\',\' then d:=i+1;
c:=copy(a,d,10);
end;
Edit2.Text:=b;
Edit3.Text:=c;
end;
end.
5: Tobi aus aus dem Bierbrunnen schrieb am 08.06.2006 um 14:19 Uhr
Homepage: http://www.ffw-immendorf.de
Gude ILO, ei des sieht nach was aus.
Also das mit dem Danke Biturger brauchen wir als Banner des find ich geil.
ICh möchtwe an dieser Stelle auch bei Bitburger für die schönen Zeiten Danken die ich Dank seinem guten Geschmack,
seiner Erfüllung und Reinheit durchleben durfte. Diese schönen Dienstag, Freitag, Samstag und Sonntag morgen mit Kopfweh aufstehen durfte
und das ich Leute kennengelernt habe von denen ich noch nicht mal weiß das es sie gibt. Die Theaterdienste mal ausgeschloßen.
Samti Stuppi Amen
Tobis
4: Andrea aus Bonn schrieb am 06.06.2006 um 21:13 Uhr
wooooooow schon so viel zu sehn 8-)
dat grün gefällt mir
tschööö
andi
3: lugu aus Idorf schrieb am 06.06.2006 um 21:05 Uhr
Homepage: http://www.tagträumer.net
Heeeeeeeeeey isssseeeee
bin ja ma gespannt wat dat hier noch wird =)
warscheinlich wird die aktueller als die ffw Homepage^^
greeetz da mach
2: dragos aus dem Puff schrieb am 06.06.2006 um 20:19 Uhr
ROTZ!
mach weiter so olli!
da make
1: Olles aus Immendorf schrieb am 05.06.2006 um 15:17 Uhr
So hier ist das Gästebuch!
Viel Spaß damit!