habs gefunden, weiter unten stand:
Adresseingabe.edit_anamnese.SetTextAndStyle(DefineEncoding(DecodeBase64(r.idxField(31).stringvalue),Encodings.MacRoman),
DecodeBase64(r.idxField(32).stringvalue))
aber warum schmiert das so hart ab?
Gruß
Stefan
>
> der Aufruf ist folgender:
>
> im MouseDown Event eines PopupArrows steht:
> zeigeadresse(auftragknr,1,Auftrag)
>
> Sub zeigeadresse(nr as string, woher as integer, fenster as Window)
>
> dim a,i ,satz as integer
> dim r as recordset
> dim a1,a2,a3 as string
>
> if val(lock_adressen)<>0 then dbheil.SQLExecute("UNLOCK RECORD
> '"+lock_adressen+"' ON TABLE Adressen")
> r=dbheil.sqlselect("select rowid, * from Adressen where rowid='"+nr+"'")
>
> dbheil.SQLExecute("LOCK RECORD '"+r.IdxField(1).stringValue+"' ON TABLE
> Adressen") // Rowid sperren
>
> if not dbheil.Error then
> lock_adressen=r.IdxField(1).stringValue
> adresseingabe.rowid_nr.Text=r.IdxField(1).stringValue
> adresseingabe.editfield1.text=r.IdxField(18).stringValue
> adresseingabe.editfield2.text=r.IdxField(2).stringValue
> adresseingabe.editfield3.text=r.IdxField(3).stringValue
> usw
> usw
>
> else
> global_message("Dieser Datensatz ist bereits in Benutzung",1,fenster)
> end if
>
>
> End Sub
>
>
>> Soll dies ein Ratespiel werden? ;-)
>>
>> Ohne Code & nähere Infos wird Dir da keiner weiter helfen können....
>>
>> a.
>>
>>
>> On 10.08.10 10:30, "Stefan Sicurella" <[email protected]> wrote:
>>
>>> Hi,
>>>
>>> ich habe hier ein schweres Problem mit meiner App unter Windows.
>>> Bei einem Funktionsaufruf, der auf dem Mac problemlos läuft, schmiert die
>>> App
>>> unter Win einfach ab.
>>> Ab und an gibt es ein Problembericht, manchmal aber auch nicht...
>>>
>>> auch wenn ich unter Win debugge schmiert die App einfach ab ohne, dass RB
>>> irgend etwas im Debugger anzeigt
>>>
>>> Der gleiche Aufruf von einem anderen Fenster aus klappt...
>>>
>>> Ich habe überhaupt keine Idee, was ich da machen könnte! sonst jemand
>>> vielleicht?
>>>
>>>
>>> Gruß
>>>
>>>
>>> Stefan
>>
>>
>>
>
>
